PAnE I DCyXElB SRG DCO^-'EB SYSTfc-M EXERCISER TEST 



O 



O , TITLE OCQi^EB SYSTEM EXERCISER TEST O 

,£.8REL 

/COPYRIGHT MAY 7» 19/1 
O /REV, 0, REVISED APRIL, 21, 19X2 O 

/DIGITAL EQUIPMENT CORPORATION, MAYNARO, MASS,, 01754 

/PROGRAMMER; EARU Ui BOUSE 

O / o 

/ 

/THIS PROGRAM IS DESIGNED To EXERCISE THE TRANSMITTER, RECEIVER AND 
O /TELEPRINTERS FOR THE 'DCOa."EB' AND DCOl-'BB, THE PROGRAM WILL EXERCISE O 

/FROM '1' TO '41 OCOA^EB'S OR 'BB' SIMULTANEOUSLY IN CONFIGURATIONS OF 

/•l' TO '32' TELETYPES, THE TEST STARTS BY TYPING A 'REPEATING' 
O /CHARACTER SET SIMULTANEOUSLY ON ALL AVAILABLE TELETYPES AND THEN RUNS O 

/A "FLOATING tELETYPE" TEST, IN THIS TEST, QNE TELETYPE ON EACH DCOIEB 

/UNIT IS LEFT 'SILENT' WHILE ALL REMAINING TELETYPES CONTINUE TYPING OUT 
O /THE CHARACTER SET, AFTER COMPLETING APPROXIMATELY TEN LINES OF CHARACTER O 

/SETS THE 'SILENT' TELETYPE IS RE-STARTED AND ANOTHER TELETYPE IS ' LEFT 

/ISILENT', ANY CHARACTER MAY BE TYPED IN ON THE 'SILENT' TELETYPE AND 
O /IT WILL 'ECHO' BACK THE CHARACTER THUS TESTING THE 'KEYBOARD' SECTION O 

/OP THAT TELETYPE, PROVISION IS MADE TO «HOLU' ANY SELECTED TELETYPE 

/IN AN lECHOt Hade INOEFINAtELY, this is done via typing a 'CNTR'A' 
O /ON ANY 'SILENT' TELETYPE* A '#» WILL BE ECHOED BACK TO INDICATE 'ECHO O 

/HOLD'i FOLLOWED VIA A NUMBER OF «0 TO 7' TO INDICATE THE 0£SIREd""TELE- 

/TYPE TO BE SELECTED AND TERMINATED BY 'CARRIAGE RETURN', TYPING 'RUBOUT' 
O /WILL RUBOUT ANY PRECEEDING NUMBER AND TYPING A SECOND 'CNTR A' FOLLOWED BY O 

/A 'CARRIAGE RETURN' WILL TERMINATE THE 'ECHO HOLD' MODE, 
/ 



O 70776^ A EBA=707764 

7^57732 A EEM = 707702 



O 00011 R A , BLOCK / 

00020 R ■..i00!4S30 A SYSERR /ERROR INDICATOR FOR THE MONITOR 

00021 R ai00lii'^0 A /W,C, for DATA WORD ERROR CODES, 

O 00022 R (.■:)00£:3W0 A ERCODE 

00023 R O00s;)«0 A 

00024 R !;;00yiJ&3 A 

O 00025 R 0(.10000 A 

00026 R !,i00aM0 A 

0002^ R 300£^00 A 

O 0!i30^S R (000000 A 

.EJECT 

o 
o 
o 
o 



o 



/ 

O 00000 R 6!'H0<50 A USERSW 604030 /I/O OEvlCE WITH MULTI^APl, # 70 O 

eKPtJi R ■',BO0^l A , 31 /UNIT ^2 ADDRESS »72', 

00002 R «b0032 A 32 /UNIT ^3 ADDRESS »74', 

O 30003 R aE0£i)33 A 33 /UNIT #4 ADDRESS '73' O 

0i^0W4 R fci!^0l44 R ,DSA SERVCE 

0^30^5 R !5!;;00v3i R ,DSA INIT 

O Smme R 040317 A ,SIXBT 'DCOIEBI 

0k3007 R 6l0biJ2 A " . 

00K10 R [)2fn)00 A DATASW 20000 /DATA 'SW4' INHIBITS THE 'DCOl^EB' TEST 



O 
O 

o 

O 

o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o • 

o 



PACt 



2 




DCWlfut 


\ SRC 


DCOlr^EB SYSTEM EXERCISER 










/IHITIAUHE THE 
/ 

I N I T 


UC01''EB» TES 


000^1 


R 


;i,00000 


A 




000vs;^ 


R 


70 7 764 


A 


EBA 




000053 


R 


7077M2 


A 


EEM 




000:54 


R 


2000-il 


R 


LAC 


IN IT 


000.55 


R 


^;40144 


R 


DAC 


SERVCE 


000^6 


R 


14 020 


R 


DZM 


SYSERK 


000^7 


f^ 


140021 


R 


n?M 


SYSERR+l 


4 


R 


140022 


R 


DHM 


ERCQDE 


00041 


R 


142010 


R 


P5!M 


ECHOl"" 


00042 


R 


142011 


R 


DZM 


EqH02 


00043 


f^ 


14 2012 


R 


OHM 


ECU 03 


00044 


R 


14201^ 


R 


D2M 


ECH04 


00B45 


R 


111111 


A 


LAW 


"i 


00046 


R 


042014 


R 


DAC 


SfUTTl 


000 4 7 


R 


042015 


R 


DAC 


SIl,TT2 


000^0 


R 


4 2016 


R 


DAC 


SI'!.TT3 


000i3l 


R 


■342017 


R 


DAC 


£.IETT4 


0001P2 


R 


042020 


R 


DAC 


3 1'LSWi 


00^3 


R 


S42021 


R 


DAC 


siLswa 


000134 


1? 


042022 


R 


DAC 


3asw3 


000^3 5 


R 


042023 


R 


DAC 


3IL,SW4 


000ip6 


R 


042030 


R 


DAC 


LONEl" 


000t37 


R 


042031 


R 


DAC 


10NE2 


00060 


R 


^42032 


R 


DAC 


L0NE3 


00061 


R 


w42033 


R 


DAC 


L0NE4 


00062 


R 


042037 


R 


DAC 


KST0R4 


0006.1 


R 


w42040 


R 


DAC 


K5T0R> 


00064 


R 


042041 


R 


DAC 


KST0R6 


0006 5 


R 


i',.4204o 


R 


DAC 


KSTQRO 


00066 


R 


1004i30 


R 


JMS 


DlSFlG 


00067 


R 


202074 


R 


lAC 


(ACTJVl 


000/0 


R 


EH 2 3 4 


R 


DAC 


KSTORi 


00071 


R 


ii 4 2 4 4 


R 


DAG 


lEMPl" 


00072 


R 


2020713 


R 


LAC 


UCTIV2 


000 73 


R 


042035 


R 


DAC 


KyT0R2 


00074 


R 


202076 


R 


UAC 


(ACTJV3 


00075 


R 


042036 


R 


DAC 


KST0R3 


00076 


R 


2020/7 


R 


UAC 


(ACTJV4 


00077 


R 


042042 


R 


DAC 


KSTOR/' 


00100 


R 


777734 


A 


LAW 


e44 


0010:1 


R 


!;:i4204t} 


R 


DAC 


TEMP 2 


00102 


R 


777/77 


A 


LAW 


^i 


30103 


R 


062044 


R 


DAC*> 


TEMPI 


00104 


R 


442044 


R 


ISH 


TEMPI 


00105 


R 


442045 


R 


ISZ 


TEMP2 


00106 


R 


6 010 3 


R 


JHP 

/ 

, EJECT 


,•-3 













TEST 



/CLEAR ERROR LOCATIONS 



/DISABLE SCANNER AND »CLR' FLAGS UNIT //l 
/ADDRESS OF UNIT #1'S ACTIVE TELETYPES, 

/UNIT #2 
/UNIT #3 
/UNIT #4 

/CLEAR 'ACTIVE' TELETYPE BUFFER, 
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DCyiEB SI'iC 


001 W 7 


R 


772ya0 


A 


0^5110 


R 


04 2U61 


R 


WkUXi 


li 


y 4 2 6 2 


R 


00112 


R 


G421^63 


R 


001X3 


R 


4 2k} 6 4 


R 


00114 


R 


2i^21iiiy 


R 


00115 


R 


w40i;^i 


R 


00115 


R 


2021M1 


R 


00117 


R 


Li4 0t>14 


R 


3(iJl2C) 


R 


2021^2 


R 


0el21 


R 


0401367 


R 


9^122 


R 


2021^3 


R 


0in23 


R 


J4 0642 


R 


0^124 


R 


2021ii:M 


R 


0M125 


n 


04071^ 


R 


00126 


R 


2a21ii53 


R 


00127 


R 


34206!? 


R 


0ai^0 


R 


142W24 


R 


0;'5131 


R 


142^2^ 


R 


001^2 


R 


142026 


R 


0H133 


R 


142027 


R 


00134 


R 


776000 


A 


00i;ii> 


R 


a42066 


R 


001v56 


R 


101664 


R 


00137 


R 


202X06 


R 


0&3140 


R 


;J42046 


R 


00141 


R 


101326 


R 


00142 


R 


lBl34ti 


f^ 


0W143 


R 


620031 


R 



DCOl-rElB SYSTEM EXERCISER TEST 



LAW 


r6000 


UAC 


LOOPA 


DAG 


LODPB 


OAC 


LUOPC 


DAC 


LUOPU 


LAC 


(DSTSW0+1 


DAC 


OSTSW0 


LAC 


(RECl" 


OAC 


USTSWl 


i.AC 


(REC2' 


DAC 


USTSW2 


LAC 


(HEC3' 


OAC 


DSTSW3 


LAC 


(R£C4~ 


DAC 


DSTSW4 


LAC 


(600000 


DAC 


PASCNT 


DZM 


HLQTTi 


Dm 


HLDTT2 


DZH 


HLDTT3 


D?M 


hCott4 


LAW 


■^2000 


DAC 


WAITCT 


JMS 


HCJLDSW 


LAC 


(215 


DAC 


TEMP3 


JHS 


TKNSHT 


JHS 


SETPHT 


/ 

.EJECT 


INIT 





/WAIT COUNTER FOR 'FLAG 
/CHECK 'HOLD SWITCH' 
/=T0 'CARRIAGE RETURN! , 



SET' TIME 



/INITIALIZE ALL 
/SET UP ' ASCII' 



TTY'S WITH 'CARRIAGE RETURN', 
CHARACTER TABLES, 
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LiCkUEii SRC 



PCOl^EB SYSTEM EXERCISER TEST 











/SERVICE ROUTINE FOR THE 


y 1 4 4 


R 


0K00U0 


A 


SERVCE 




fcf 1 4 b 


R 


707/64 


A 


EBA 




00146 


R 


707702 


A 


EEM 




en 4 7 


R 


y420/0 


R 


DAC 


SAVEAC 


001^0 


R 


6201^1 


R 


JMP«* 


OSTSW0 


00J!3l 


R 


a U 


A 


OSTSW0 




001!?2 


R 


20 206 6 


R 


LAC 


WAJTCT 


0011?^ 


R 


7 4 2 U 


A 


SHA 




00153 4 


R 


600227 


R 


siMP 


CHKFLG 


001i35 


R 


7777/7 


A 


LAW 


^X 


00156 


R 


042072 


R 


DAC 


FLGDRV 


0W1&7 


R 


1016 6 4 


R 


^MS 


HQLUSW 


00160 


R 


100303 


R 


JMS 


CHKTHfN 


00161 


R 


442061 


R 


ISZ 


lOopa 


00162 


R 


7 410H0 


A 


SKP 




0!i;i63 


R 


1010^2 


R 


JHS 


FLOATl 


ii50164 


R 


442062 


R 


ISZ 


LCiOPB 


0K165 


R 


741000 


A 


SKP 




9^166 


R 


10106/ 


R 


vIMS 


FL0AT2 - 


00167 


R 


442063 


R 


ISZ 


Ltiopc' 


00170 


R 


741000 


A 


SKP 




00171 


R 


1011P4 


R 


JMS 


rL0AT3 


0W172 


R 


4 42 6 4 


R ■ 


ISH 


Lciopp 


0^^1173 


R 


741000 


A 


SKP 




00174 


R 


101241 


R 


JNS 


FL0AT4 


00175 


R 


202030 


R 


LAC 


LONEl 


017 6 


R 


7 4 1 2 


A 


SNA 




0017 7 


R 


601/32 


R 


viHP 


EXJTM5 


0020a 


R 


2020/2 


R 


l,AC 


FLGDRV 


00201 


R 


740200 


A 


S2A 




00202 


R 


601737 


R 


JHP 


noflac 


00203 


R 


2020 3 7 


R 


LAC 


KST0R4 


002^)4 


R 


740100 


A 


SHA 




0205 


R 


600222 


R 


JMP 


EXIT 


00206 


R 


202^540 


R 


LAC 


KSTORS 


00207 


R 


7401ij0 


A 


SMA 




00210 


R 


600222 


R 


.JHP 


EXIT 


00211 


R 


202041 


R 


LAC 


KSTORS 


00212 


R 


74011^0 


A 


SHA 




00213 


R 


600222 


R 


JMP 


EXIT 


00214 


R 


202043 


R 


LAC 


KSjORa 


00215 


R 


7 4 01 U 


A 


SMA 




0216 


R 


600222 


R 


JMP 


EXIT 


00217 


R 


4 4 2 S 


R 


ISZ 


pascnj 


00220 


R 


741000 


A 


SKP 




00221 


R 


601/24 


R 


JMP 


EXITM4 


00222 


R 


705t>12 


A 


EXIT RPL 




00223 


R 


7^1100 


A 


SPAICLA 




00224 


R 


2020/0 


R 


LAC 


saveac 


00225 


R 


703344 


A 


DBR 




0022 6 


R 


620144 


R 


JMP» 


SERVCE 



"PCOl-'EB" TEST 



/SAVE CONTENTS OF 'ACi, 



/HAVE TELETYPES BEEN SET UP? 
/no, CHECK ACTIVE TTY»S 

/SET "NO^FLAG" INDICATOR, 

/CHECK FOR THE HOLO SWITCH, 

/CHECK TRANSMITTER AND RECEIVER FLAGS. 

/ECHO UNIT ^1 

/YES, FLOAT NEXT TTY 
/ECHO UNIT ri 

/YES, FLOAT NEXT TTY, 
/ECHO UNIT #3 

/YES, FLOAT NEXT TTY, 
/ECHO UNIT #4? 

/YES, FLOAT NEXT TTY, 

/IS ONLY '11 TELETYPE AVAILABLE? 
/YES, EXIT ''"^" 

/WERE ANY FLAGS SET? 
/NO, EXIT 



/INCREMENT THE PASS COUNTER, 

/ON OVERFLOW, TYPE 'DQNE» , 

/IS »API' ON? 
/YES, RESTORE »AC' 
/N0» EXIT 
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UCaiEB SRC 



UQ0X»Z3 SYSTtM EXCRCISER TEST 
.EJECT 
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DCOl^'EB SYSTEM EXERCISER jEST 



00232 

00234 
00235 
00236 
0k)237 
0y24 
0M241 
00242 
0B243 
00244 
00245 
0^5246 
01;)247 
002!30 
032i3l 
00252 
00253 
00254 
00255 
00256 
2 5 7 

y 2 6 

00261 
00262 
■00263 
00264 
0!3265 
00266 
00267 
00270 
00271 
00272 
00273 
002/4 
00275 
002/6 
00277 
00300 
00301 
00302 



401 
600 
401 
502 

101 
H6 2 
442 
401 
600 
401 
600 
4 01 
5!'i2 
ISI 
"62 
442 
401 
600 
4 1 
600 
4 01 
502 
101 
62 
442 
401 
600 
4 01 
6 00 
401 
502 
101 
062 
442 
401 
600 
442 
601 
142 
202 
042 
101 
101 
6 00 



610 
240 
614 
107 
644 
034 

03 4 
634 

227 

oil 
251 
615 
107 
64 4 
035 
035 
6J5 
240 
612 
262 
6.1.6 
107 
644 
036 
036 
636 
251 
613 
273 
617 
\V>1 
64 4 

04 2 

042 
637 
262 
066 
7 32 
0/2 

110 

046 
664 
32 6 
222 



/DETERMINE 
n "ACTIVE" 
/ 

QHKF|,G XCT 
JMP 
XCT 
AMD 
JMS 
DAC^ 
ISZ 
XCT 
JMP 
XCT 
JMP 
XCT 
AND 
JMS 
DAC^ 
ISZ 



CKFUG2 



THE N0, OF AVAIl,ABLE 
TTY BUFFER FOR EACH 

SSFl 

CKFLCi2 

HSDl 

(7000 

F<QT9R 

KSTORl 

KSTORi 

STSl 

CHKFUCi 

S3F2 

GKFLG3 

KSD2 

(7000 

R(n9R 

KSTORH 

K3T0H2 

XCT StS2 

JMP gKFLG2 

CKFLGS XCT SSF3 

JMP CKFUG4 

XCT RS03 ^ 

AND (7000 

JMS H0T9R 

DAC» KST0R3 

IS2 KST0R3 

XCT StS3 

JMP CKFLG3 

CKFLG4 XCT 3SF4 

JMP EXTCKP 

XCT RSD4 

AND (7000 

JMS h6T9R 

OAC* KST0R7 

ISZ KSTQR7 

XCT STS4 

JMP CKFl,G4 

EXTCKF ISZ WAITCT 

JHP EXITM5 

DZM FLGDRV 

LAC (212 

DAC Tii:Mp3 

JMS Hg^DSW 

JMS TRNSMT 

JHP EXIT 
/ 
.EJECT 



TTY'S AND SET UP 
UNIT, 

/IS UNIT #a, SCANNER FLAG SET? 
/NO, CHECK UNIT #2 

/READ SCANNER DATA AND CLEAR FLAG, 
/MASK SCANNER LINE N0, 

/SAVE Scanner address 

/CLEAR scanner FLAG<S RESTART THE SCANNER, 

/REGHECK SCANNER FLAG 

/SCANNER #2 FLAG SET? 

/NO, CHECK UNIT #3 

/READ SCANNER DATA AND CLEAR FLAG 



/SAVE SCANNER ADDRESS 

/CLEAR SCANNER FLAG S RESTART SCANNER, 

/RECHECK SCANNER FLAG 

/IS UNIT #3 SCANNER FLAG SET? 

/CHECK UNIT #4, 

/READ SCANNER DATA AND CLEAR FLAG 

/MASK SCANNEF? LINE N0, 

/SAVE SCANNER ADDRESS 

/CLEAR SCANNER FLAGS RESTART THE SCANNER, 

/RECHECK FLAG 

/IS UNIT #4 SCANNER FLAG SET? 

/NOi EXIT 

/READ SCANNER DATA AND CHAR FLAG, 



/SAVE SCANNER ADDRESS, 

/RESTART THE SpANNERf 

/ALL FLAGS HAD TIME TO SET? 
/NO, EXIT "^5", 
/CLEAR "NO'FLAG" INDICATOR 
/=T0 LINE FEED 

/CHECK FOR HOLD SWITCH. 
/START TEST 
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DCMIEB SRC 



DCOi-EB SYSTEM EXERCISER TEST 

/CHECK UNIT ffXt2('i ANO 4 FOR ANY TRANSMITTER FUAGS FOR BEING SET 
/ 



00006 
003,10 

00:ni 

003 J. 3 
03;!. 4 
00315 

00317 
0H3^g 
0^321 
i-J 3 2 2 
003^^3 
0!«24 
003Ji^ 



R oy 

R 2^0 
R 74 

R 6a 

R 40 

R 6y 

R 4fr! 

R 14 

R 14 

R ;:M 

R ^'ii 

R 10 
R 54 
R 69 
R 0-4 
R IK 

R ly 

R 4B 
R 60 



00y0 
J:'024 

031^ 
1613 
3 a 6 
1614 

20^4 

204 4 

2vy/ 

1644 
2W14 

04i36 

2111 
0414 

1 6 '4 
0304 



00326 


R 


2B2fei2S 


R 


00327 


R 


7402^1^ 


A 


00330 


R 


6i;^0334 


R 


00331 


R 


4ai6ii 


R 


00332 


R 


6003i)0 


R 


00333 


R 


4k5161t5 


R 


00334 


R 


1425^72 


R 


00335 


R 


142023 


H 


3 3 6 


R 


042044 


R 


00337 


R 


5&2107 


R 


K 3 4 y 


R 


lkH644 


R 


00341 


R 


542Sdl!J 


R 


00342 


R 


6ii''0i>31 


R 


00343 


R 


342112 


R 


00344 


R 


100414 


R 


00345 


R 


2&0(dW0 


A 


00346 


R 


4^1641 


R 


0034 7 


R 


600 3 26 


R 



CHKTRN 





l,AC 

SZA 

sJMP 

XCT 

JMP 

XCT 

om 

DAC 
AND 

JHS, 

SAD 

JHP 

TAD 

JMS 

1,00000 

XQT 



HUPTTl 

.+4 
SSFl 
CHKTRH 
K3D1 ' 

fCgdrv 

HLDTTl 
TEMPI" 
(7000 

h6t9R 

SIUTTl 
CKRECi 
(TABktl 
PKTCMR 

susi 

CHKTRN+1 



INDICATOR, 
INDICATOR, 



JMP 
/ 

/CHECK UNIT #2 TRANSMITTER FLAGS 

/ 

CHKTR2 UAC HUDTT2 

SZA 

JMP ,+4 

XCT SSF2 

JHP CHKTR3 

XCT RS02 

DZM FUGDRV 

Dm HUDTT2 

OAC TEMP3.' 

AND (7000 

JMS HQT9R 

SAD SIUTT2 

JMP CKREC2 

TAD (tabi,e:2 

JMS PRTCHK 

200000 

XCT " SLS2 

JMP CHKTR2 

/ 

, EJECT 



/WAS THE HOLD SWITCH SET? 

/YES, PROCESS DATAi 

/IS UNIT UX SCANNER FLAG SET? 

/NO, CHECK UNIT U?,, 

/READ SCANNER DATAi 

/YES, CLEAR "NO-FLAG" 

/CLEAR THE 'HOLD SET' 

/SAVE Data 

/ROTATE RIGHT '9', 

/=TU SILENT TTY? 

/YES, CHECK RECEIVER DATA 

/CALCULATE PRINT BUFFER ADDRESS 

/SETUP THE NEXT CHARACTER 

/=T0 UNIT Ui 

/TRANSMIT NEXT CHARACTER 

/CHECK NEXT FLAG 



/IS UNIT #2 SCANNER FLAG SET? 

/NO, CHECK UNIT #3 

/READ SCANNER DATA 

/YES, CLEAR "NO^FLAG" INDICATOR, 

/SAVE DATA 

/ROTATE RIGHT '9', 

/=TQ SILENT TTY? 

/YES, CHECK RECEIVER DATA 

/CALCULATE PRINT BUFFER ADDRESS 

/SETUP THE NEXT CHATACTER 

/=T0 UNIT #2 

/TRANSMIT NEXT CHARACTER 

/CHECK NEXT FLAG, 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



PAGt a OCyil-IB SRC DCOl^EB SYSTtH EXERCISER TEST 



o 



O /CHECK UNIT ir6 THANSMJTTER FLAGS O 

/ 



CHKTH3 UAC HUDTT^ 

O 003t>l R yiRiiKH] A SHA 



O 
O 
O 

o 
o 
o 

o 



/ 

.EJECT 



O 



JHP ,+<^ 

Bfe53^^3 R 4S1612 R XCT 3SF3 /IS UNIT #3 SCANNER F|,AG SET? 

O 003&4 R 6003 /a R JMP CHKTR** /NOi CHECK UNIT #4, O 

003S55 R 4016X6 R XCT . RSD3 /READ SCANNER DATA 

003i>6 R 142^;/^ R DHM FLGORV /CIEAR "NQf^FLAG" INDICATOR, 

O 0(5357 R 142026 R D2M HLDTT3 O 

00360 R 04H044 R DAC TEMPl" /SAVE DATA 

00361 R 502137 R AND (7000 _ 
O 00362 R 101644 R JMS RQT9R O 

00363 R 542^16 R SAD SaTT3 /sTP SILENT TTY? 

0^5364 R 6i:;06a4 R JMP CKREC3 /YES, CHECK RECEIVER DATA 

O 00365 R 342113 R TAD (TA8u£3 /CALCULATE THE PRJNT BUFFER ADDRESS O 

!5!r)366 R lK04i4 R JMS PRTCHK /SETUP THE NEKT CHARACTER 

00367 R 3y0i^u;0 A 300000 /?T0 UNIT #3 

O 00370 R 401642 R XCT ^ SLS3 /TRANSMIT NEXT CHARACTER O 

00371 R 600350 R JMP CHKTR3 /CHECK NEXT FLAG 

/CHECK UNIT #4 TRANSMITTER FLAGS, 

O / ~ " o 

00372 R 202027 R CHKTR4 LAC HL0TT4 
a[5i76 R 740200 A S^A 

O 00374 R 600400 R JMP ,*4 O 

Qi6:575 R 401613 R XCT SSF4 /IS UNIT #4 SCANNER FLAG SET? 

00376 R 620303 R JMP» CHKTRN /NO i EXIT ■ 

O 003/7 R 401617 R XCT HSD4 ' /READ SCANNER DATA ^ 

00400 R 1420/2 R D2M FLGDRV 

00401 R 142027 R OZM HL0TT4 

O 00402 R W42044 R DAC TEMPI /SAVE OaTA, ^ 

00403 R 502107 R AND 57000 

00404 R 101644 R JHS R0T9R 

O 00405 R 542017 R SAO SJLTT4 /sTQ SILENT TTY? O 

00406 R 6006i)7 R JMP CKREC4 /YES, CHECK RECEIVER DATA 

00407 R 3421X4 R TAD aABLE4 /CALCULATE THE PRINT BUFFER ADDRESS 

O 00410 R 100414 R JMS PRTCHH /SETUP THE NEXT CHARACTER O 

00411 R 400000 A 400000 " /=T0 UNIT UA 

00412 R 401043 R XCT ' SLS4 /TRANSMIT NEXT CHARACTER 

O 00413 R 6003/2 R JMP CHKTR4 /CHECK NEXT FLAG, O 



o 
o 
o 
o 
o 
o 

o 



u 
o 
o 
o 



PAKi-; 



DCidXZB SHV, 



DCai^EB SYSTEn EXERCISER TEST 



O 
O 
O 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



00414 
00413 
00416 
00417 
00420 
,00421 
00422 
00 4 23 
00424 
00425 
00 4 26 
0042 7 
0&}4s50 
00441 
00432 
004CS3 
024 34 
00435 
00 4 36 
00437 
00440 
004 41 
004 42 
4 43 
00 4 4 4 



Q0 
4 
22 
4 
44 
22 
34 
20 
50 
7 4 
60 
56 
7 4 
10 
46 
22 
4 
22 
74 
60 
20 
50 
36 
3 4 
62 



0000 

20 4 5 
414 
2 0/3 
0414 
204 5 
2046 
2044 
2115 
1200 
4 32 
2046 
1000 
17 4 4 
204 5 
2045 
2046 
2046 
1200 
4 4 5 
2044 
2107 
2046 
2116 
0414 



00451 
00452 
00453 
00454 
00455 



401620 
401621 
401622 
401623 
620450 



00445 R 202117 f^ 

00446 R 062045 R 
0044/ R 600433 H 



00450 R 000000 A 



/SUBROUTINE 
/CHARACTER, 
/NEXT CHATAC 

/ 
PRTCHF^ 

DAC 

LAG'-* 

DAC 

ISH 

UAC» 

DAC 

UAC 

AND 

SNA 

JMP 

SAD» 

SKP 

JMS 

PRCHRl UAC» 
DAC 
LACtt 
SNA 
JHP 
UAC 
AND 
TAO« 
TAD 
.JMP<> 
/ 

/RESET PRINT 
/ 

RESETP UAC 
DAC» 
sJMP 
/ 

/DISABUE SGA 
/ 


XCT 
XCT 
XCT 
XCT 
JMP« 
,E>JE 



TO COMPARE TRAN 

ENTERED WJTH P 

TER TO BE TRANS 



TEMP2 

PRTCHK 

UNIT 

PRTCHK 

TEMP2' 

TEMp3 

TEMPI 

lp7 

,+4 
TEMP3 

ERRORl 

TEMP?" 

TEMP2 

TEMPS 

T|MP3 

RESETP 
TEMPI 

1 7 am 

TEMP3 

(400 

PHTCHR 

TA8UE POINTER 

(PRTTAB 

TEMP2 

PKCHRi 



SMITTED DATA AND SETUP TO TRANSMIT THE NEXT 
RINT 'BUFFER ADDR' IN 'AC', AND EXIT WITH THE 
HITTED IN «AC' , 



/STORE SEUECTED TTY'S PRINT BUFFER 
/STORE FAIUIHG UNIT N0, 



/5T0 PRINT TABUE ADDRESS POINTER 

/SCANNER DATA 

/MASK 'CHARACTER' BITS, 

/=T0 '0' FROM RESTARTED TTY? 

/YES, DON'T COMPARE DATA, 

/SAME AS TRANSMITTED DATA? 

/YES, CONTINUE 

/NO.. DATA TRANSMIT ERROR 

/INCREMENT TABLE POINTER 



/sTD NEXT CHARACTER TQ BE TRANSMITTED 

/END OF TA81E? 

/YES, RESET TABLE POINTER 

/ORIGINAL SCANNER DATA 

/MASK SCANNER ADDRESS 

/ADD 'NEW CHARACTER 

/-TO CLEAR THE 'TR' FLAG, 



/RELOAD PRINT TABLE 



NNER AND CLEAR ALL FLAGS, 



DISFLG 



DISl 
DIS2 
DiS3 
DI'S4 
DISFLG 



/UNIT in 

/UNIT #2 

/UNIT #3 

/UNIT #4 



CT 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



PAGt 1» 



DCyiEb SRC 



DCC3l,r,EB SYST£.M EXERCJSER TEST 











/CHECK 


THE RECEIVER DATA Ff 


«0M 










/"ECHO 


HOUD" Rode' IF "cntr 

i 


A" 


3 4 b 6 


R 


2 02020 


R 


CKRECl 


LAC 


iilLSWl 




004!;7 


R 


7 4 0200 


A 




S2A 






00469 


R 


600526 


R 




JMP 


ULRFGl 




BB461 


R 


202101 


R 




LAC 


(RECl" 




004 62 


R 


042060 


R 




DAC 


TYPDATA 




00463 


R 


202120 


R 




LAC 


(CLRFGl 




4 6 4 


R 


042057 


R 




DAC 


CKREC" 




00465 


R 


202121 


R 




LAC 


(KST0H4 




00466 


R 


['J4 2050 


R 




DAC 


TEMP5' ■■■ 




00467 


P 


2020/4 


R 




LAC 


(ACTIVI 




00470 


R 


042051 


R 




DAC 


■|EMP6 




00471 


R 


202122 


R 




LAC 


(ECHO! 




00472 


R 


4 20';) 2 


R 




DAC 


te:hp7" 




0134 7 3 


R 


202123 


R 




LAC 


aOQPA 




00474 


R 


4 20 56 


R 




DAC . 


TEMPI! 




00475 


R 


202044 


R 




LAC 


TEMP3." 




004 7 6 


R 


502115 


R 




AND 


(377 




0047 7 


R 


542124 


R 




SAD 


(201 . 




00500 


R 


741000 


A 




SKP 






00501 


R 


620514 


R 




J HP it 


DSTSWl 




00502 


R 


202010 


R 




LAC 


ECHOl" 




00503 


R 


7 4 020 


A 




S^A 






00504 


R 


620514 


R 




JMP« 


OSTSWl 




00505 


R 


111 I'll 


A 




LAW 


^X 




0050 6 


R 


042010 


R 




DAC 


echo;l 




00 50 7 


R 


042037 


R 




DAC 


KST0R4 




00510 


R 


202125 


R 




LAC 


(DECODE 




00511 


R 


040514 


R 




DAC 


PSTSWi 




00512 


R 


202126 


B 




LAC 


(243 




00513 


R 


600515 


R 




JMP 


RECl 




00 514 


R 


000000 


A 


DSTSWl 



/ 
DAC 






00515 


R 


04204 7 


R 


RECl 


TEMP4 




00515 


R 


202044 


R 




LAC 


TEMPI 




00517 


f^ 


50210/ 


R 




AND 


(7000 




00520 


R 


342047 


R 




TAD 


TEMP4 




00521 


R 


342116 


R 




TAD 


(400 




00522 


R 


401640 


R 




XCT 


SLSl 




0052 3 


R 


1111 11 


A 




LAW 


«i 




0052 4 


R 


042020 


R 




DAC 


siLSwi 




00525 


R 


600304 


R 




JMP 

1 

D2M 


CHKTRN+l 




00526 


R 


142020 


R 


CLRFGl 


SILSWI 




00527 


R 


4 16 3 4 


R 




XCT 


STSl 




00530 


R 


60 03 i-v 4 


R 




JMP 
.EJECT 


CHKTRN*! 





UNIT «1'S SILENT TELETYPE AND ENABLE THE 
IS TYPED, 



/HAS SILENT TTY BEEN SET UP? 
/NO, CLEAR TTY FLAG, 

/ = T0 THE ADDRESS TO 'ECHO' UNIT /#1, 

/=T0 THE ADDRESS TO 'UNIT' HEC, ROUTINE 

/ADDRESS TO STORE SELECTED SCANNER ADDR, 



/RESTORE SCANNER DATA 
/MASK CHARACTER 'BITS?, 
/WAS "CNTR A" TYPED? 

/NOi CONTINUE 

/IS "ECHO HOLD" ACTIVE? 
/YES, IGNORE ALL "CNTR A'S" 

/NO, ENABLE "ECHO HOLD", 



/SET UP TO DECODE SELECTED TTY, 

/TYPE '#' TO INDICATE 'ECHO HOLD' MODE 



/SAVE CHARACTER TO BE TRANSMITTED 

/MASK SCANNER ADDRESS 

/ADD CHARACTER 

/?T0 CLEAR THE »TR' FLAG, 

/TRANSMIT 



/EXIT 



/CLEAR SILENT TTY FLAG, 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
' o 
o 
o 
o 



n 



o 



PAGE 11 OCferLEiB SRC DCOl^EB SYSTEM EXERCISER TEST 



O /CHECK THE RECEIVER PATA FROH UNIT "2'S SILENT TEUETYPE AND O 

/ENABLE THE "EChO' HOl,Li" HODE IF "CNTR A" IS TYPED, 

O ^05^1 R ^\i2'^^X R CKREC2 UAC SRSWii . U 

S2A 

sJMP QLRF-G2 

O 005^4 R 202:,li^a R UAC CREC2 

DAC TYPDATA 

LAC (CURFG? 

C 00537 R 04 20t?7 R DAC CKREC 



^0 5.51 


R 


2^2^21 


R 


'/i^b62 


R 


7 4 02y0 


A 


00533 


R 


6 6 y J, 


R 


0053 4 


R 


202:i.i^2 


R 


00535 


R 


042060 


R 


00536 


R 


20212 7 


R 


00537 


R 


04205/ 


R 


00543 


R 


202130 


R 


00541 


R 


042!ii50 


R 


00542 


R 


2S20/5 


R 


00543 


R 


0^2^J51 


R 


0K544 


R 


2!if2131 


R 


00545 


W 


042^52 


R 


0y546 


R 


2E<32132 


R 


00547 


R 


042K!56 


R 


(i) 5 5 


R 


202044 


R 


00551 


R 


502115 


R 


00552 


R 


542124 


R 


00553 


R 


741000 


A 


00554 


R 


620567 


R 


00555 


R 


20 2(^11 


R 


00556 


R 


740200 


A 


0055 7 


R 


620567 


R 


00560 


R 


7777/7 


A 


00561 


R 


042011 


R 


00562 


R 


4 20 4 


R 


00563 


R 


202125 


R 


00564 


R 


40 5 6 7 


R 


00565 


R 


202126 


R 


00566 


R 


6 00 5 7 


R 


00567 


R 


000000 


A 


0057 


R 


04 2^4/ 


R 


005/1 


R 


202044 


R 


0057 2 


R 


502107 


R 


00573 


R 


34204/ 


R 


57 4 


R 


342116 


R 


00575 


R 


401641 


R 


005/6 


R 


7 777/7 


A 


00 577 


R 


04 2021 


R 


00600 


R 


600326 


R 


00601 


R 


142021 


R 


0060;:! 


R 


4«1635 


R 


00603 


R 


600326 


R 



LAC (KST0K5 

DAC TEMP5" /ADDRESS TO STORE SELECTED SCANNER ADDR, 



/ 

REC2 DAC TEMP4 /SAVE CHARACTER TO BE TRANSMITTED 



XCT 5TS2 

JMP CHKTR2 



O .EJECT 

O 
O 
O 



u 



o 
o 
o 



O 00542 R 2S20/5 R LAC (ACTiEV2 

DAC TEMP6 

..-- ,., ., LAC (ECH02 

O 00545 R 042^52 R DAC TEHPV • ^ 

LAC (LOOPB 

,.„, .. ,. .,. ,,...... ., DAC TEMPli ^, 

O 00550 R 202044 R LAC tEMPl " /RESTORE SCANNER DATA ^ 

AND {^^n /MASK CHARACTER 

SAD (201 /WAS «CNTR A' TYPED? 

O 00553 R 741000 A SKP ' ^ 

JMP» 0STSW2 /NO, CONTINUE 

- _, „ LAC ECH02 

O 00556 R 740200 A SHA /IS "ECHO HOLD" ACTIVE? U 

JHPtt DSTSN2 /YES, IGNORE ALL "CNTR A'S", 



,.^.w.. M , , , - r , M LAW ■^l .^ 

O 00561 R 042011 R DAC ECH02 /N0| ENABLE "ECHO HOLD" O 

DAC K3TQR5 

.,. ,, c--^^^ .. LAC (OECOUE 

O 0K^64 R 040567 R DAC DSTSW2 /SET UP TO DECODE SELECTED TTY. O 

LAC (243 ■ /TYPE '#' TO INDICATE 'ECHO HOLD' MODE 

JMP REC2 
O 00567 R 000000 A 0STSW2 



o 
o 



O 005/1 R 202044 R LAC TEHPl 

AND (7000 /MASK SCANNER ADDRESS 

. ,. _ ,., . .. TAD T&MP4 /ADD CHARACTER 

O 00574 R 342116 R TAD (400 /=T CLEAR THE »TR« FLAG, O 

XCT SLS2 /TRANSMIT 

LAW «i 

O 00577 R 042021 R DAC SILSW2 (J 

JMP aHKTR2 /EXjT 

/ 

O 00601 R 142021 R CLRFG2 DHN SILSW2 O 



O 
O 
O 
O 

O 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



PAGE X?, 



UCWIEB SRC 



OCOl-rEB SYSTEM EXERCISER TEST 



0M6B4 
00 6(0 5 
B0606 
00607 
00610 
0B611 
0063.^ 
0B613 
00 614 
00615 
00616 
00617 
00620 
0062;J, 
00622 
00623 
00624 
00625 
00626 
00627 
0PJ630 
6 31 
00642 
006:5^ 
00644 
006413 
00646 
00647 
0064 
00641 
00642 

00644 
0064 4 
00645 
00646 
00647 
00650 
00651 
00652 
00654 



R 202 
R 74 
R 6 00 
R 202 
R 042 
R 2 02 
R H42 
R 202 
R 04 2 
R 202 
R 042 
R 202 
R fj4 2 
R 202 
R 042 
R 202 
R =502 
R 542 
R 741 
R 6 20 
R 202 
R 7 40 
R 620 
R 777 
R 042 
R 04 2 
R 202 
R 040 
R 202 
R 600 
R 000 



022 R 

200 A 

654 R 

104 R 

060 R 

144 R 

057 R 

144 R 

050 R 
076 R 

051 R 

145 R 

052 R 

146 R 

056 R 
044 R 
115 R 

124 R 
000 A 
642 R 
01.2 R 
200 A 
642 R 

r)7 A 

012 R 
041 R 

125 R 

642 R 

126 R 

643 R 
000 A 



042047 
202044 
502107 
342047 
342116 
401642 
I'll ■111 
042022 
600450 



00654 R 142022 R 

00655 R 401646 R 

00656 R 600350 R 



/CHECK TH 

/AND ENAB 

/ 

CKREC3 I 
S 
J 
L 
D 
L 

L 
D 



0STSW3 
REC3 



CI.RFG3 



E RECE 
LE THE 

AC 

MP 
AC 
AC 
AC 
AC 
AC 
AC 
AC 
AC 
AC 
AC 
AC 
AC 
AC 
ND 
AD 
KP 

HPi> 

AC 

'ih 

MP« 

AW 

AC 

AC 

AC 

AC 

AC 

HP 



IVER DATA FROM UNIT i^3'S SIUENT TELETYPE 
"ECHO HOLD" MODE IF "CNTR A" IS TYPED, 

^IISW4 



AC 
AC 
NO 
AD 
AD 
CT 
AW 
AC 
HP 

2M 
CT 
MP 
EJECT 



CLRFG4 
(REC3" 
TYPDATA 
(CURFG3 

cRrec 

(KST0R6 

TEMP5' 

(ACTJV3 

TEMP6 

(ECH04 

TEHP7" 

(UOOPC 

TEMPI! 

TEHPl" 

(477 

(201 

QSTSW4 
ECHD3'' 

DSTSW4 

ECHQ3 

KSTORb 

(PECOPE 

03TSW3 

(243 

REC3 



TEMP4 

TEMPI 

(7000 

TEMP4 

(400 

SUS3 

''I 

SiLSW4 

CHKTR5 

SILSW4 

StS3 
aHKTR4 



/=T0 THE ADDRESS TO "ECHO" UNjT #3, 



/MA3K CHARACTER BITS 
/WAS "CNTR A" TYPED? 

/NQ^ CONTINUE 

/YES 

/IS "ECHO HOLD" ACTIVE? 

/YES, IGNORE AtL "CNTR A'S", 

/NO, ENaBUE "ECHO H0I,D" 



/SAVE CHARACTER TO BE TRANSMITTED 
/MASK SCANNER ADDRESS 

/TRANSMIT 

/EXIT 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



O 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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13 




DC:'')1EL 


i SRC 


PCOlrEB SYSTEH EXERCISER 










/CHECK 


THE RECEIVER DATA PRQ 










/AND ENABLE THE 

J 


"ECHO HOUP" 


6 b 7 


R 


202 023 


R 


CKREC4 


UAC 


SJUSW4 


B0660 


R 


7 4 0200 


A 




SHA 




00661 


R 


600727 


R 




JMP 


CURFC4 


00662 


R 


202104 


R 




UAC 


(KEC4~ 


00663 


R 


04 206 


R 




DAC 


TYPDATA 


00664 


H 


202137 


R 




UAC 


(CURFG4 


00665 


R 


4 20 5 7 


R 




DAC 


CKREC 


00666 


R 


2021^0 


R. 




UAC 


(KST0H8 


f1 6 6 7 


R 


04 2050 


R 




DAC 


TEMP5' 


00670 


R 


202077 


R 




UAC 


(ACTJV4 


0fe)671 


R 


042051 


R 




DAC 


TEMP6 ■ 


00672 


R 


2021^1 


R 




UAC 


(ECHO^ 


00673 


R 


042052 


f^ 




UAC 


TEMP7^ 


00 674 


R 


2^52142 


R 




UAC 


aoopu 


00675 


R 


042056 


R 




DAC 


TEMPI! 


00676 


R 


202044 


R 




UAC 


TEMPI" 


00677 


R 


502115 


R 




AND 


(377 


00 700 


R 


542124 


R 




SAD 


(201 


00 701 


R 


741000 


A 




SKP 




00 702 


H 


620/15 


R 




JMP« 


DSTSW4 


00703 


R 


202013 


R 




UAC 


EGHOI" 


00704 


R 


7402^0 


A 




SHA 




00705 


R 


620715 


R 




JMP<^ 


D3TSW4 


00 706 


R 


7 7 7 / 7 7 


A 




UAW 


n 


00 70 7 


R 


042013 


R 




DAC 


EgH04 


00710 


R 


04 2043 


R 




DAC 


KSTORa 


00711 


R 


202125 


R 




UAC 


COECOUE 


00 712 


R 


040715 


R 




DAC 


DSTSW4 


00713 


R 


202126 


R 




UAC 


(243 


00714 


R 


600716 


R 




JHP 


REC4 


00 715 


R 


00000'^ 


A 


0STSW4 



/ 
DAC 




00 716 


R 


042047 


R 


REC4 


TEMP4 


0B717 


R 


202044 


R 




UAC 


TEMPI 


00 7 20 


R 


502107 


R 




AND 


r/000 


00721 


R 


3420^7 


R 




TAD 


TEMP4 


00722 


R 


342116 


R 




TAD 


(400 


00 7 23 


R 


401643 


R 




XCT 


SUS4 


00724 


R 


777/77 


A 




UAW 


^1 


00725 


R 


S42023 


R 




DAC 


siusw4 


00 726 


R 


600372 


R 




JMP 
/ 

DHM 


CHKTR2 


00727 


R 


14 2023 


R 


CLRFG4 


SIUSW4 


00730 


R 


401637 


R 




XCT 


STS4 


00731 


R 


600372 


R 




JMP 
.EJECT 


CHKTR4 



TEST 

M UNIT #4'S SIUENT TEUETYPE, 
MODE IF "CNTR A2 IS TYPED, 



/=T0 THE ADDRESS TO "ECHO" UNIT /H, 



/MASK CHARACTER BITS, 
/WAS "CNTR A" TYPED? 

/NO* CONTINUE 

/YES 

/IS "ECHO HOUD" ACTIVE? 

/YES, IGNORE AUU "CnTR A'S", 

/NO. ENaBUE "ECHO HOUD", 



/SAVE CHARACTER TO BE TRANSMITTED. 
/MASK SCANNER ADDRESS 

/TRANSMIT 

/EXIT 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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DC IE [3 SRC 


OCOl'^EB SYSTLM EXtRCISER 










/decode: 


THE SELECTED TELETYP 

i 


my/ 62 


R 


54 2106 


R 


DECODE 


SAD 


(215 


007v53 


R 


600764 


R 




JMP. 


DECODA 


30 7 34 


R 


542115 


R 




SAO 


Vi>ll 


00735 


R 


600760 


R 




JMP 


RUBOUT 


00 7 36 


R 


042054 


R 




DAC 


TEMP9~ 


00737 


R 


502143 


R 




AMD 


(/ 


00740 


R 


042053 


R 




DAC 


TEMPa 


00743, 


R 


202144 


R 




LAC 


(N0TABL«1 


00742 


R 


042055 


R 




DAC 


TEMPIM 


00743 


R 


442055 


R 




ISZ 


TEMPl^ 


00744 


R 


222055 


R 




LAC« 


TEMP10 


00745 


R 


542054 


R 




SAD 


TEMP9" 


0B746 


R 


6 007 5 4 


R 




JMP 


QMPUTE 


007 4 7 


R 


542145 


R 




SAD 


(267 


00750 


R 


741000 


A 




SKP 




00751 


R 


60 7 43 


R 




JMP 


, -b6 


00752 


R 


202146 


R 


TYPEQM 


LAC 


(277 


00753 


R 


622060 


R 




JMP« 
/ 

LAC 


TyPOATA 


00754 


R 


202053 


R 


CMPUTE 


TEMPB 


00755 


R 


062050 


R 




DACi* 


tEMP5 


00756 


R 


202054 


R 




LAC 


TEMP9 


00757 


R 


622060 


R 




JMP« 

/ 

LAW 


TYPDATA 


00 7 60 


R 


7777/7 


A 


RUBOUT 


'1 


00761 


R 


062050 


R 




DACi> 


TEMP5 


00762 


R 


202147 


R 




LAC 


(257 


00763 


R 


622060 


R 




JMP* 


TYPDATA 










/ON TERMINATING 


CHECK THE SE 


00764 


R 


222050 


R 


PECQDA 


LAC« 


TEMP 5 


00765 


R 


542150 


R 




SAD 


("1 


00766 


R 


600776 


R 




JMP 


TAGA 


00 767 


R 


222051 


R 




LAC« 


TEMP6 


00770 


R 


56205,0 


R 




SAOtt 


TEHP5 


00771 


R 


6007 76 


R 




JMP 


TAGA 


00772 


R 


542150 


R 




SAD 


(-1 


mi'/z 


R 


600 752 


R 




JMP 


TYPEQM 


00774 


R 


442051 


R 




ISH 


TEMP6 


00775 


R 


600767 


R 




JMP 


1 "6 


007 7 6 


R 


162052 


R 


TAG A 


D2M* 


TEMP7 


mi'ii 


R 


777777 


A 




LAW 


'^i 


01000 


R 


062056 


R 




DACi* 


TEMPll 


01001 


R 


6220 57 


R 




JMP* 

/ 

.EJECT 


UKREC 















TEST 



TYPE OF ALL UNITS 



/WAS iCr' typed TO TERMINATE? 
/YES, CHECK SELECTED TELETYPE? 
/WAS RUBOUT TYPED? 
/YES, DELETE LAST CHARACTER, 
/SAVE CHARACTER 



/ADDRESS OF CHARACTER TABLE 

/sTO SELECTED N0, 

/YES 

/END OF TABLE? 

/YES, ILLEGAL CHARACTER 

/TYPE '?' 

/STORE m\ 

/ECHO BACK THE »N0, ' 

/TYPE A '/' TO INDICATE RUBOUTi 
SELECTED TELETYPE FOR BEING AVAILABLE 



/WAS A CHANNEL SELECTED? 

/NO, CLEAR "ECHO HOLD" ACTIVE 

/=T0 UNITS "ACTIVE" BUFFER 

/?TQ SELECTED TELETYPE? 

/YES Exit 

/END OF "ACTIVE" TABLE? 

/YES, ILLEGAL TTY SELECTED, TYPE '_?» 



/CLEAR "ECHO" 

/SET 'LOOP' COUNTER TO EXIT NEXT PASS 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
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DCUlfiO SRC 



DC01^F.B SYSTEM EXtRClSER TEST 











/RPUTIME TO FLO 

/ 
FLOATl 


AT '1' Tl 


QXi'iki?. 


R 


M0 00 


A 




i;nKi<53 


R 


766000 


A 


UAW 


'^12000 


01004 


R 


Q42061 


R 


OAC 


loopa" 


01005 


R 


042020 


R 


OAC 


51LSW1 


01006 


R 


2014/3 


R 


UAC 


ACTlVi 


01007 


R 


542150 


R 


SAD 


.(^1 


01010 


R 


621002 


R 


JMP« 


FLOATl 


01011 


R 


202101 


R 


LAC 


CRECl' 


01012 


R 


0405X4 


R 


DAC 


DSTSWl 


01013 


R 


202014 


R 


LAC 


s'lLTTi 


01014 


R 


1016^4 


R 


JMS 


R0T9L 


0,1015 


R 


04 2045 


R 


DAC 


TEHP2 


01016 


R 


202037 


R 


LAC 


KaT0R4 


01017 


R 


5421^0 


R 


SAD 


("1 


dX^2Q 


R 


741000 


A 


3KP 




01021 


R 


6010D0 


R 


MP 


SELCTl 


01022 


R 


222034 


R 


LAC« 


KSTORl 


01023 


R 


5421^^0 


R 


SAD 


(^1 


Q1024 


R 


101036 


R 


vJMS 


SETAVl 


01025 


R 


222034 


R 


LAC« 


KSTORl 


01026 


R 


042014 


R 


DAG 


SILTTi 


01027 


R 


44 203 4 


R 


IS2 


KSTORl 


01030 


R 


202045 


R 


FLTIA LAC 


TIhP2' 


01031 


R 


5421S1 


R 


SAD 


r/770W0 


01032 


R 


601035 


R 


JMP 


,*3 


01033 


R 


342116 


R 


TAD 


(400 


01034 


R 


401640 


R 


XCT 


SLSl 


03,035 


R 


621002 


R 


JMP* 
.EJECT 


FLOATl 



ON UNIT in WHILE TYPING ON ALL OTHERS 



/REINITIALISE LOOP COUNTER 

/SET 'SILENT' SWITCH, 

/IS THIS UNIT 'ACTIVE'? 
/NO, NO TTY'S 

/REINITIALISE THE 'RECEIVER' TEST 



/SET UP THE 'CURRENT' SILENT TTY 

/IS "ECHO HOLD" SELECTED? 

/YES, ECHO SELECTED TELETYPE, 

/END OF "ACTIVE" TABLE? 
/YES, RESET "ACTIVE" TABLE 
/GET NEXT TTY TO BE ECHOED 



/IS ANY TTY NOW SILENT? 
/N0« EXIT, 

/-TO CLEAR THE 'TR' FLAG, 
/RESTART SILENT TTY 



o 

o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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01036 
010^7 
01fcH9 

01042 
010 43 
01tH4 
01045 
01046 
0104 7 
010S0 
010S)1 
01052 
010S3 
010!3 4 

01M!?6 

010537 

01060 
01061 
01062 
01K63 
01064 
01065 
01066 



DC01EB SRC 



Dcoi-EB SYSTE.M e><ercjse:r test 



R 000 
R 2w2 
R h42 
R 201 
R 542 
R 741 
R 621 
R 202 
R 740 
R 042 
R 751 
R 202 
R 042 
R 74 
R 621 
R 777 
R 042 
R 621 
R 142 
R 202 
R 04 2 
R K'H 
R 542 
R 621 
R 601 



J:^M0 
0/4 
MJ4 
4/4 
1^0 

ml 

0-5 
2ki0 
1^1 
04^ 
200 
0>i6 
/// 

014 
0s5a 

06,1 
0i7 
014 
654 
045 
0W2 
033 



SETAVl 



SEUCTl 



CLA 



LAC 

DAC 

1,AC 

SAD 

SKP 

gHPtt 

LAC 

CM A 

DAC 

SNA! 

l,AC 

DAC 

S2A 

JMP* 

lAW 

DAC 

JMP» 

D2M 

L,AC 

DAC 

JMS 

SAD 

JMPtt 

JMP 

,E4ECT 



(ACTIVl 

KSTORi 

ACTlVi+1 

SETAVl 

LONEl 

LPNE3. 

JiMP2~' 
SETAVl 

SIUTTI 

SETAVi 

lOOPA 

KaT0R4 

SiUTTi 

RbT9t, 

TEMP2 

FLOATl 

FLTIA" 



/IS ONUY 11» TELETYPE AVAaABLE? 

/N0« EXIT 
/YES 



/FUOAT TTY? 
/YES, FLOAT TTY 
/NO, RESTART TTY 



/=T0 SELECTED TELETYPE 



/IS SELECTED TTY ALREADY SILENT? 
/YES, IGNORE AND EXIT, 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



() 
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DCii'lEt: 


i SRC 


OCQl^EB SYSTEM EXtRCISER T 


o 










/ROUTINE TO FLOAT '1' TELETYPE 




010 6 7 


R 


000000 


A 


FLQAT2 


1 






o 


01070 


R 


774000 


A 




LAW 


"4000 




01071 


R 


0420 62 


R 




DAC 


LOOPB 




010/2 


R 


042021 


R 




DAC 


SILSW2 


o 


010 73 


R 


201^04 


R 




LAC 


ACTIV2 




01074 


R 


54 21t50 


R 




SAD 


C^\ 




01075 


R 


621067 


R 




JMP* 


FL0AT2 


o 


10 76 


R 


202102 


R 




LAC 


(REC2' 




01077 


R' 


040^67 


R 




DAC 


DSTSW2 




01100 


R 


2^201? 


R 




LAC 


51LTT2 


o 


01101 


R 


If.n6t>4 


R 




JMS 


HQT9L' 




01102 


K 


G4204!3 


R 




OAC 


TEMP2 




0110C5 


R 


202040 


R 




LAC 


KST0R5 


o 


01104 


R 


542li30 


R 




SAD 


(^1 




01105? 


R 


741000 


A 




SKP 






01106 


R 


601X4!5 


R 




gMP 


3ELCT2 


o 


0110 7 


R 


222^35 


R 




LACi^ 


KSTQR2 




01110 


R 


542150 


R 




SAD 


(=^1 




01111 


R 


101123 


R 




JMS 


yETAV2 


o 


01112 


R 


222035 


R 




UAC* 


K3T0R2 




01113 


R 


042015 


R 




DAC 


SILTT2 




01114 


R 


442335 


R 




ISH 


KST0R2 


o 


01115 


R 


202045 


R 


FLT2A 


LAC 


Ti.MP2' 




01116 


R 


542151 


R 




SAD 


(777000 




01117 


R 


601122 


R 




vJMP 


,*3 


O - 


01120 


R 


v342116 


R 




TAD 


(400 




01121 


R 


401641 


R 




XCT 


SLS2 




01122 


R 


621067 


R 




JHP» 


FL0AT2 















, EJECT 




o 
















o 
















o 

















TEST 



o 
o 
o 
o 
o 
o 

o 



ON UNIT #2 WHILE TYPEINO ON ALL OTHERS 



/REINITIALISE LOOP COUNTER 
/SET 'SILENT' SWITCHi 



/IS THIS UNIT 'ACTlVEf? 
/NO, NO TTY'S 



/=T0 N0, OF SILENT TTY, 

/SET UP TO RESTART TTY, 

/IS "ECHO HOLD" MODE SELECTED? 

/YES, ECHO SELECTED TELETYPE, 

/END OF "ACTIVE" TABLE? 
/YES, RESET 'ACTIVE' TABLE 
/GET NEXT TTY TO BE SELECTED, 



/IS A TTY NOW SILENT? 
/NO I EXIT 

/=T0 ClEAR THE 'TR' FLAG, 
/YES, RESTART SILENT TTY, 



o 



o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



o 
o 
o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



o 

o 
o 
o 
o 
o 
o 
o 
o 



o 
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DCW1E13 SRC 



QCOl 



011^.5 


R 


900000 


A 


01124 


R 


2020^S> 


R 


0112!? 


R 


;y42M3i> 


R 


01126 


R 


201iJ053 


R 


01127 


R 


5421^0 


R 


01130 


R 


7410W0 


A 


01131 


R 


621123 


R 


01132 


R 


202031 


R 


01133 


R 


740001 


A 


01134 


R 


042031 


R 


01135 


R 


7&1200 


A 


01136 


R 


202in 


R 


01137 


R 


042045 


R 


01140 


R 


740200 


A 


01141 


R 


621123 


R 


01142 


R 


111 111 


A 


01143 


R 


042015? 


R 


01144 


R 


621123 


R 


0114J? 


R 


142062 


R 


01146 


R 


202040 


R 


01147 


R 


0420iS 


R 


011!30 


R 


10l6t)4 


R 


01i:p1 


R 


542045 


R 


011!?2 


R 


621067 


R 


011^3 


R 


601115 


R 



SETAV2 



SEUCT2 



eE8 SYSTEM EXERCISER 




UAC 


(ACTJV2 


DAC 


KSTORii 


LAC 


ACTIV2+1 


SAD 


^-1, ' 


SKP 




.,JMP« 


3ETAV2 


LAC 


LQNE2' 


CHA 




PAC 


LaHE2 


SNAICLA 




I AC 


{ilim% 


DAC 


TEMP2' 


SZA 




gMP» 


SETAV'<i 


LAW 


ri 


DAC 


yiLTT2 


sJMP* 


SETAVii 


DHM 


LPOPB' 


LAC 


KSTORiJ 


DAC 


3ILTT2 


gns 


RdT9L 


SAD 


TEMP2 


JMP« 


FLOATH 


vJMP 


FLT2A' 


, EJECT 





TEST 



/JS ONLY '1' TELETYPE AVAILABLE? 
/NO, EXIT 



/=T0 SELECTED TELETYPE 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



( ) 



o 
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L)C0lEt 


i SRC 


DCOl^EB SYSTEM EXERCISER T 


o 










/ROUTINE TO FLOAT '1' TELETYPE 




011t)4 


R 


& 3 


A 


f 

FL0AT3 




o 


011i3 53 


R 


7660tJ0 


A 


LAW 


"12000 




0:1.1^6 


R 


042063 


R 


DAC 


LOOPC" 




011S57 


R 


042022 


R 


DAC 


a}LSW3 


o 


01160 


R 


201515 


R 


LAC 


ACTIVS 




01161 


R 


542150 


R 


SAD 


c^l 




01162 


R 


621154 


R 


slMP<» 


FL0AT3 


o 


01163 


R 


202103 


R 


LAC 


(HEC3~ 




f51164 


R 


04064X 


R 


DAC 


05TSW3 




0116b 


R 


202016 


R 


LAC 


siLTT3 


o 


01166 


R 


101654 


R 


sJMS 


KdT9L 




01167 


R 


042045 


R 


DAC 


TEMP2 




01170 


R 


2 02041 


R 


LAC 


KSTDR6 


o 


01171 


R 


542150 


R 


SAD 


t^l 




01172 


R 


741000 


A 


SKP 






01173 


R 


601232 


R 


JMP 


SELCT3 


o 


01174 


R 


222036 


R 


LAC* 


K^T0R3 




311/5 


R 


542150 


R 


SAD 


<-l 




01176 


R 


101210 


R 


UMS 


SETAV3 


o 


01177 


R 


222036 


R 


LAC* 


KST0R3 




01200 


R 


042016 


R 


DAC 


SILTT3 




01201 


R 


442036 


R 


JSH 


kstorS 


o 


01202 


R 


202045 


R 


FLT3A LAC 


TEMP2 




01203 


R 


542151 


R 


SAD 


(777000 




01204 


R 


601207 


R 


vJMP 


,*3 *■ 


o 


01205 


R 


342116 


R 


TAD 


(400 




01206 


R 


4^11642 


F^ 


XCT 


SLS3 




01207 


R 


621154 


R 


JMP« 


FLQAT3 


o 










.EJECT 




o 














o 














o 














o 





























o 














o 














o 














o 














o 















TEST 



ON UNIT ^3 WHILE TYPING ON ALL OTHERS, 



/REINITIALISE LOOP COUNTER 
/SET f SILENT' SWITCH, 



/IS THIS UNIT 'ACTIVE'? 
/N0» NO TTY'S 



/IS "ECHO HOLD" MQDE SELECTED? 

/YES, ECHO SELECTED TELETYPE 

/END OF "ACTIVE" TABLE? 
/YES, RESET "ACTIVE" TABLE, 
/GET NEXT TTY TO BE ECHOED, 



/IS A TTY NOW SILENT? 
/NOi EXIT 

/=T0 CLEAR THE 'TR' FLAG, 
/YES, RESTART SILENT TTY, 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 
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DCaiElB SRC 


DC01"L"B SYSTEM EXtRCISER T 


o 


01210 


R 


l-it^000t) 


A 


Se:TAV3 









S1211 


R 


2f^20/6 


R 




LAC 


(ACTIV3 




01212 


R 


042036 


R 




OAC 


K3T0R3" 


o 


01213 


R 


201516 


R 




LAC 


ACTIV3+1 




01214 


R 


542150 


R 




SAD 


(^1 




01215 


R 


7410^0 


A 




SKP 




o 


01216 


R 


621210 


R 




gMP* 


3ETAV3 




01217 


R 


202032 


R 




LAC 


L0NE3' 




01220 


R 


740001 


A 




CHA 




o 


01221 


R 


042032 


R 




DAC 


LPNE3 




01222 


R 


751200 


A 




SNAICLA 






01223 


R 


202151 


R 




LAC 


(77 70M0 


o 


01224 


R 


042045 


R 




DAC 


TEMP2"" 




0122b 


R 


740200 


A 




S2A 






01226 


R 


62l2i0 


R 




JHP« 


S£:TaV3 


o 


01227 


R 


111 111 


A 




LAW 


"l 




01230 


R 


042016 


R 




DAC 


3iLTT3 




01231 


R 


621213 


R 




JMPtt 


se;tav3 


o 


01232 


R 


142063 


R 


SEUCT3 


DHM 


Loopc' 




01233 


R 


202041 


R 




LAC 


KST0H6 




01234 


R 


042016 


R 




DAC 


silttS 


o 


01235 


R 


101654 


R 




vJMS 


RdT9L 




01236 


R 


542045 


R 




SAD 


TEHP2 




01237 


R 


621154 


R 




JMP* 


FL0AT3 


o 


01240 


R 


601202 


H 




JMP 


FLT3A" 












/ROUTINE TO FLOAT fl' TELETYPE 


o 


01241 


R 


000000 


A 


FLQAT4 









01242 


R 


766000 


A 




LAW 


-12005^ 




01243 


R 


042064 


R 




DAC 


LUOPD* 


o 


01244 


R 


042023 


R 




DAC 


SILSW4 




0i24£i 


R 


201526 


R 




LAC 


ACT IV4 




01246 


R 


542150 


R 




SAD 


HI 


o 


01247 


R 


621241 


R 




,JMP* 


rU0AT4 . 




012b0 


R 


202104 


R 




LAC 


('REC4" 




012S1 


R 


040715 


R 




DAC 


0STSW4 


o 


3l2tj2 


R 


202017 


R 




LAC 


SILTT4 




012S33 


R 


101654 


R 




^MS 


RdT9L~ 




012&4 


R 


042045 


R 




DAC 


TEMP2 





01255 


R 


202043 


R 




LAC 


KSTORU 




01256 


R 


542150 


R 




SAD 


("1 




01257 


R 


741000 


A 




SKP 




o 


01260 


R 


60131/ 


R 




JMP 


SELCT4 




01261 


R 


222042 


R 




LAC* 


K5T0R/ 




01262 


R 


542150 


R 




SAD 


(^1 


o 


01263 


R 


1012/5 


R 




vJMS 


SETAV4 




01264 


R 


222042 


R 




LAC» 


KSTOR/ 




01265 


R 


042017 


R 




DAC 


SILTT4 


o 


01266 


R 


442042 


R 




IS2 


KSTOR/ 




0126/ 


R 


202045 


R 


FLT4A 


LAC 


TEMP2' 




01270 


R 


542151 


R 




SAD 


( /77000 


o 


01271 


R 


6012/4 


R 




JMP 


,+3 




01272 


R 


342116 


R 




TAD 


(400 



















o 
















o 

















/THIS The only tty available? 

/NO, EXIT 



/float TTY? 
/YES, FLOAT TTY 
/NO, RESTART TTY, 



/=T0 SELECTED TELETYPE 



/IS SELECTED TTY ALREADY SILENT 
/YES, EXIT 

/NO, RESTART LAST TTY, 
ON UNIT #1 WHILE TYPING ON ALL OTHERS, 



/REINITIALIZE LOOP COUNTER, 



/IS THIS UNIT 'ACTIVE'? 
/NO, NO TTY'S 



/IS "ECHO HOLD" MODE SELECTED? 

/NO, CONTINUE 

/YES, ECHO SELECTED TELETYPE, 

/END OF "ACTIVE2 TABLE? 
/YES, RESET "ACTIVE" TABLE, 
/GET NEXT TTY TO BE ECHOED? 



/IS A TTY NOW SILENT? 

/NO, EXIT 

/=T0 CLEAR THE 'TR' FLAG, 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
n 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



PAGE ;?i 



DCmEB SRC 



01273 R 4016^^4 R 
B1274 R 62li;41 R 



DCOl-EB SYSTE.M EXtRCISER TEST 

/YES, RESTART SIUENT TTY, 



XCT 
.EJECT 



SLS4 
FL0AT4 



o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 
o 



o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
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DC01EB SRC 


dl?-7'^ 


R 


000000 


A 


D12/6 


R 


2102077 


R 


0127 7 


R 


042042 


R 


01300 


R 


201527 


R 


01301 


R 


542150 


R 


01302 


R 


741000 


A 


0130 3 


R 


6212/5 


R 


01304 


R 


202033 


R 


01305 


R 


740001 


A 


01306 


R 


042033 


R 


01307 


R 


751200 


A 


31310 


R 


202151 


1^ 


01311 


R 


042045 


R 


01312 


R 


740200 


A 


01313 


R 


621275 


R 


01314 


R 


7777/7 


A 


01315 


R 


042017 


R 


01316 


R 


621275 


R 


01317 


R 


142064 


R 


01320 


R 


202043 


R 


01321 


R 


042017 


R 


01322 


R 


10165 4 


R 


01323 


R 


542045 


R 


01324 


R 


621241 


R 


01325 


R 


601267 


R 



DCOl-EB SYSTEM EXERCISER TEST 



SETAV4 



SE1-CT4 





L,AC 

DAC 

LAC 

SAD 

SKP 

JMPtt 

LAC 

CMA 

DAC 

SNAJCLA 

UAC 

DAC 

SZA 

JMP^* 

LAW 

DAC 

JMPa 

D2M 

UAC 

DAC 

JMS 

SAO 
JMP» 
JMP 
.EJECT 



UCTIV4 

K3T0f^7 

AUTIV4+1 

(^1 

3ETAV4 

L.6NE4" 

l,0NE4 

(777000 
T|mP2*' 

SETAV4 

SiL,TT4 

3ETAV4 

LUOPD" 

KSTOHb 

5IUTT4 

HUT9L" 

TEMP2 

FC0AT4 

Fl,T4A 



/THIS THE ONLY TTY AVAILABLE? 
/NO, EXIT 



/FLOAT TTY? 
/YES, FLOAT TTY 
/MQ, RESTART TTY, 



/=T0 SELECTED TELETYPE, 



/IS SELECTED TTY ALREADY SILENT? 

/YES, EXIT 

/NO, RESTART LAST TTY, 



O 
O 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



o 



o 
o 
o 
o 
o 
o 
o 






o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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01331 
01332 
01333 
01334 
01335 
01336 
0133 7 
013'40 
01341 
01342 
01343 
01344 



01345 
01346 
01347 
013^0 
013!?1 
013^2 
01353 
01354 
01355 
01356 
01357 



UC01EB SRC 



DCOi-EB SYSTfc-M EXERCISER TEST 



R £i''5 
R 77 
R 04 
R 20 
R 04 
R 22 
R 54 
R 62 
R 34 
R 40 
R 4 
R 40 
R 40 
R 44 
R 60 



0000 
7740 
2044 
215^; 
2045 
2fe:i45 
2150 
1326 
2046 
1640 
1641 

164;? 

1643 

2045 

1333 



R 0B0 

R 777 

R 042 

R 202 

R S42 

R 202 

R 062 

R 442 

R 442 

R 601 

R 621 



y00 

740 
04 4 

T^i "Ar •fci 

045 
117 
045 
45 
44 
353 
345 



/TRANSMIT 

/ 

TRNSMT 



A CHARACTER TO INlTIAUIHt ALU TELEPRINTERS , 



TRNSl 



/SET UP 
SETPRT 





lA 
DA 
LA 
DA 
LA 
SA 
JM 
TA 
XC 

xc 

XC 

xc 

IS 

JM 

TH 

/ 



LA 

DA 

LA 

DA 

LA 

DA 

IS 

IS 

JM 

JM 

lE 



W 
C 

c 
c 
c« 

D 
P« 

D 
T 
T 
T 
T 
i 
P 
E 



AS 



W 

c 
c 
c 
c 
c« 

2 
Z 

P 

Ptt 

JECT 



^40 
TEMPI 
(SCNTAB 
TEMP2 
TtMP2 
(-1 

TRNSMT 
TEMP3" 
SCSI 
SLS2 
SLS3 
SLS4 
TEMP2 
TRNS,3, 
CU' CHARACTER 



♦'40 

TEMPI 

(TABLEl 

TIMP2~ 

(PRTTAB 

TEMPS 
TEMP2 
TEMPI, 
,^3 



/=T0 '32' TELETYPES 

/= TO Scanner address table 

/SCANNER address 

/END OF TABLE? 

/yes Exit 

/=To'cHAR, TO BE TRANSMITTED, 

/TRANSMIT TO UNJT #1 

/UNIT i^2 

/UNIT #3 

/UNIT ^4 

/INCREMENT SCANNER ADDRESS 

TABLE FOR ALL TELEPHJNTeRS, 



/UNIT H CHARACTER TABLE 

/sTO the ADDRESS OF 'CHARACTER' BUFFER 
/INITIALISE ALL '32< TTY'S, 
/INCREMENT TABLE POINTER 



SETPRT 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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UCBli-U SRC 



DCOl-EB SYSTEM EXtRCISER TEST 











/CHARACTER EQUIVALENCE TABlE 

" / ~ 

PRTTAB 212 






01360 


R 


0f;02i2 


A 


/ 


LINE FEED 


01361 


R 


G0flsi04 


A 


304 


/ 





01362 


R 


000303 


A 


303 


/ 


C 


01363 


W 


00031/ 


A 


317 


/ 





01364 


R 


0£}0261 


A 


261 


/ 


1 


01365 


R 


000255 


A 


255 


/ 


- 


01366 


R 


00030 5 


A 


305 


/ 


E 


0136 7 


R 


0003U2 


A 


302 


/ 


8 


01370 


R 


000240 


A 


240 


/ 


SPACE 


01371 


R 


S00^t51 


A 


301 


/ 


A 


01372 


R 


000302 


A 


302 


/ 


B 


013/3 


R 


^){)%'6W6 


A 


303 


/ 


C 


01374 


R 


030 4 


A 


304 


/ 


P 


0137 S 


R 


000305 


A 


305 


/ 


E 


01376 


R 


000306 


A 


306 


/ 


F 


01377 


R 


00030/ 


A 


307 


/ 


G 


01400 


R 


000310 


A 


310 


/ 


H 


01401 


R 


0003li 


A 


311 


/ 


1 


01402 


R 


000312 


A 


312 


/ 


J 


01403 


R 


600313 


A 


313 


/ 


K 


B1404 


R 


000314 


A 


314 


/ 


1. 


01405 


R 


000315 


A 


315 


/ 


M 


01406 


R 


000316 


A 


316 


/ 


N 


01407 


R 


00031/ 


A 


317 


/ 





01410 


R 


000320 


A 


320 


y 


P 


01411 


R 


000321 


A 


321 


/ 





01412 


R 


000322 


A 


322 


/ 


w 


01413 


R 


000323 


A 


323 


/ 


s 


01414 


R 


000324 


A 


324 


/ 


T 


01415 


R 


000325 


A 


325 


/ 


U 


01416 


R 


000326 


A 


326 


/ 


V 


01417 


R 


000327 


A 


327 


/ 


w 


01420 


R 


000330 


A 


330 


/ 


X 


01421 


R 


0003^il 


A 


331 


/ 


Y 


01422 


R 


000332 


A 


332 


/ 


2 


01423 


R 


000240 


A 


240 


/ 


SPACE 


01424 


R 


000260 


A 


N0TABL 260 


/ 





01425 


R 


000261 


A 


261 


/ 


i 


01426 


R 


000262 


A 


262 


/ 


2 


01427 


R 


000263 


A 


263 


/ 


3 


01430 


R 


000264 


A 


264 


/ 


4 


01431 


R 


000265 


A 


265 


/ 


5 


01432 


R 


000266 


A 


266 


/ 


6 


01433 


R 


000267 


A 


267 


/ 


7 


01434 


R 


0002/0 


A 


270 


/ 


a 


01435 


R 


0002 71 


A 


271 
/ 

-.EJECT 


/ 


9 















o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



u 



u 
o 
o 
o 



o 



o 



o 
o 
o 
o 
o 
o 
o 



o 



o 
o 
o 
o 
o 
o 

o 
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01436 
1 4 3 / 
014 40 
('J144,1 
014 4^ 
014 4.5 
■ 01444 
01445 
01446 
014 4 7 
014i30 
1 4 1? 1 
01452 
01453 
01454 
01455 
01456 
01457 
01460 
^J1461 
01462 
0:1463 
S1464 
91465 
01466 
01467 
014 70 
01471 
014/2 

01473 
015M4 
31515 
01526 
01537 
01547 
01557 
0156 7 



0157 7 
01600 
016fe51 
01602 
01603 
01604 
01605 
01606 
01607 



DC01EB SRC 



Li (:! 2 
0002 
0002 
0002 
0002 
00 02 
0002 
0002 
^100 2 
0002 
0002 
9002 
0002 
0002 

0002 

0002 
0032 
0002 

0002 

0002 
0002 
0003 
0003 
0003 
0003 

0003 

0003 
0002 

00 



4 
41 
4 2 
4 3 

4 4 
45 
46 
47 

5 a 

51 
52 
53 
54 
56 
5/ 
/2 
73 
/4 
/5 
/6 
77 
00 
33 
34 
35 
36 

6 7 
15 
00 



000000 

001000 

002000 
003000 

004000 

005000 

006000 

007000 

7777 77 



A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 

A 
A 
A 
A 
A 
A 
A 
A 



PCOl-'EB SYSTLfl EXERCISER TEST 



240 
241 
242 
243 
244 
245 

246 

247 

250 

251 

252 

253 

254 

256 

257 

272 

273 

274 

275 

276 

277 

300 

333 

334 

335 

336 

337 

215 



/ 
ACTIVl ,8l.0CK 11 
AqTIV2 .BEPCK 11 
ACTIV3 ,BL,OCK It 
ACTIV4 ,BUOCK 11 
TABLEl ,Bl,QCK 10 
TA8UE2 .BLOCK 10 
TABLES , BLOCK 10 
TA8LE4 .BLOCK 10 

/ 
/SCANNER ADDRESS TABLE 

/ 



SCNTAB 





1000 

2000 

3000 

4000 

5000 

6000 

7000 

777777 

.EJECt 



/TTY 

/ui 

/#2 
7^3 

/#4 

/U6 

/in 



m 



/ 


SPACE 


/ 


1 
• 


/ 


II 


/ 


n 


/ 


% 


/ 


'A 


/ 


& 


/ 


» 


/ 


( 


/ 


3 


/ 


» 


/ 


+ 


/ 


t 


/ 


« 


/ 


/ 


/ 


; 


/ 


J 


/ 


<; 


/ 


= 


/ 


> 


/ 


? 


/ 


9 


/ 


i; 


/ 


N 


/ 


3 


/ 


T 


/ 


■H 


/ 


CARRIAGE 



RETURN 



o 

o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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DC91EB SRC 



DQDl-^EB SYSTEM EXtRClSER TEST 



0161.0 R 7a4;;>51 A 

01611 R 734411 A 

01612 R lviA<\^l A 

01613 R 704iJii A 



01614 R 704tJi?2 A 

01615 R 704412 A 

01616 R 7044132 A 

01617 R 704!312 A 



01620 R 704i344 A 

01621 R 704404 A 

01622 R 704444 A 

01623 R 704t>04 A 



01624 R 704i?61 A 

01625 R 704421 A 

01626 R 704461 A 

01627 R 704521 A 



01630 R 704t?62 A 

01631 R 704422 A 

01632 R 704462 A 

01633 R 704iJ22 A 



01634 R 704564 A 

01635 R 7044-^4 A 

01636 R 704464 A 

01637 R 704524 A 



01640 R 704567 A 

01641 R 704427 A 

01642 R 704467 A 

01643 R 704527 A 



/ocoi 

/SKIP 

SSFl 
SSF2 
SSF3 
SSF4 

/REAP 

RSOl 

RSD2 

RSD3 

RSP4 

/DJSA 

OISl 
DIS2 
QIS3 
DIS4 

/UQAD 

l-SAl 
t.SA2 
USA3 
LSA4 

/LOAP 



/ 

ON 
/ 
7 
7 
7 
7 
/ 

SCA 

7 
7 
7 
7 
/ 
BLE 
/ 
7 
7 
7 
7 
/ 

SCA 
/ 
7 
7 
7 
7 
7 

SCA 
/ 



lOT t^IST 

SCANNER F^AG 

04551 
04411 

04451 
04511 



/UNIT n 

/#2 
/#3 
/)^4 



NNER PATA ANP C^EAR THE SCANNER AND HEC, FLAG, 
04552 /UNIT #1 

04412 /m 

04452 /#3 

04512. /#4 

THE SCANNER AND CLEAR ALU FLAGS, 



04544 
04404 
04444 

04504 

NNER ADURESS 

04561 
04421 
04461 
04521 

NNER DATA 



/UNIT #1 

/#2 
/#3 
/#4 



/UNIT #1 
/#4 



704562 /UNIT #1 

704422 /#2 

704462 /U'6 

704522 /#4 

/ 
/CLEAR SCANNER FLAG ANP START SCANNER 
/ 
7( 
7{ 

75 
71 
/ 

SCANNER, LOAD DATA AND START SCANNER 

/ 

7i 

75 

7{ 

7( 

/ 



LSPl 
LSP2 
LSP3 
LSD4 



STSl 
STS2 
STS3 
STS4 

/STOP 

SlSI 
SLS2 
SLS3 
SL34 



'04564 

'04424 

'04464 

!4524 



'04567 

'0442/ 

!4467 

'04527 



/#4 



/UNIT #1 
/#2 
/#3 
/#4 



EJECT 



o 
o- 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
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DC0XEfcJ SRC 


DCUl^EB SYSTEM EXERCISER TEST 


o 










/ROTATE 


CONTAINS PF 'ACI i' 


31 TIMES RICJHT EXIT WITH DATA 'AC 




.1. 6 '1 4 


R 


0g00W0 


A 


R0T9R 











01645 


R 


502107 


R 




ANP 


(7000 




o 


03.646 


R 


746020 


A 




CLl,!RTR 








01647 


R 


742020 


A 




RTR 








316i30 


R 


742020 


A 




RTR 






o 


016!3l 


R 


74 2020 


A 




RTR 








01652 


R 


740020 


A 




RAR 








03.653 


R 


621644 


R 




JMP* 


R0T9R 















/ROTATE 


CONTAINS OF 'AC 9 


LEFT, 




01654 


R 


000000 


A 


R0T9I, 











01655 


R 


502153 


R 




AND 


(777 




o 


01656 


R 


746010 


A 




cmiRTt 








01657 


R 


742010 


A 




RTl, 








01660 


R 


742010 


A 




RTt 






o 


01661 


R 


742010 


A 




RTU 








01662 


R 


740010 


A 




RAl, 








01663 


R 


621654 


R 




JMP» 


RQT9L 




o 










/TEST FOR DATA 


«SW4» WHICH 


INHIBITS THE DCOl^EB T^ST, 




01664 


R 


000000 


A 


HOLDSW 











01665 


R 


750004 


A 




IAS 






o 


01666 


R 


500010 


R 




AND 


DATASW 


/DATA SW4 




01667 


R 


741200 


A 




SNA 




/IS SWITCH SET? 




01670 


R 


621664 


R 




JMP« 


HQLDSW 


/NO, EXIT 


o 


01671 


R 


200151 


R 




LAC 


USTSW0 






01672 


R 


042071 


R 




DAC 


SAVDSf 


/SAVE RETURN ADDRESS 




01673 


R 


202154 


R 




LAC 


(HOLD^l 




o 


01,674 


R 


0401iJi 


R 




DAC 


DSTSW0 






01675 


R 


101702 


R 




JMS 


CLRTRN 


/CLEAR TRN FLAGS AND SAVE DATA 




01676 


R 


601732 


R 




sJMP 


EXITM5 


/EXIT 'n5' 





01677 


R 


2020/1 


R 


HOLD.l 


LAC 


SAVDSt 






01700 


R 


040151 


R 




DAC 


PSTSW0 


/RESTORE RETURN ADDRESS, 




01701 


R 


601665 


R 




^MP 


H0LDSW*1 


/REfTEST SWITCH, 


o 












/ 








01702 


R 


B00000 


A 


QLRTRN 











01703 


R 


401610 


R 




XCT 


SSFl 


/SKIP ON SCANNER FLAGi UNIT #1 





01704 


R 


601707 


R 




JMP 


«*3 






01705 


R 


40l6i4 


R 




XCT 


RSDl 


/READ SCANNER DATA, 




01706 


R 


042024 


R 




DAC 


HLDTTl 


/SAVE DATA, 


o 


01707 


R 


4016X1 


R 




XCT 


S§F2 


/SKIP ON SCANNER FLAG, UNIT #2, 




01710 


R 


601713 


R 




JMP 


1+3 






01711 


R 


401615 


R 




XCT 


HSD2 


/READ SCANNER DATA, 


o 


01712 


R 


042025 


R 




DAC 


HLDTT2 


/SAVE DATA, 




01713 


R 


401612 


R 




XCT 


SSF3 


/SKIP ON SCANNER FLAG, UNIT #3, 




01714 


R 


601717 


R 




aMP 


,+3 




o 


01715 


R 


401616 


R 




XCT 


HSP3 


/READ Scanner data, 




01716 


R 


042026 


R 




DAC 


HLDTT3 


/SAVE DATA, 




01717 


R 


401613 


R 




XQT 


SSF4 


/SKIP ON SCANNER FLAG, UNIT #4 


o 


01720 


R 


601723 


R 




JMP 


,"*3 






01721 


R 


401617 


R 




XCT 


RS04 


/READ SCANNER DATA, 




01722 


R 


042027 


R 




DAC 


HLDTT4 


/SAVE DATA, 


o 


01723 


R 


621702 


R 




JMP» 
.EJECT 


CLRTRN 




o 


















o 
















• 






















o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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DCKI3,EH SRC 



dcq1"E:b system exerciser test 



03,724 R 7777/4 A 

01725 R 040020 R 

01726 R 140021 R 

01727 R 140022 R 

01730 R 1004&0 R 

01731 R 600222 R 

01732 R 777773 A 

01733 R 040020 R 

01734 R 140021 R 

01735 R 140022 R 

01736 R 600222 R 

01737 R 705512 A 

01740 R 741100 A 

01741 R 602001 R 

01742 R 777777 A 

01743 R 620144 R 



/SET UP 
EXITM4 



TO TYPE 



■li 



DAC 
DZM 
DZM 
JMS 

■JMP 
/SETUP FOR U5' 
EXITMS UAW 

DAC 

DZM 

OZM 

JMP 
/EXIT FOR A 'NO 
NOFLAG 705512 

SPA 

JMP 

IM 

JMP» 

, EJECT 



'PONE 

n4 

SYSERR 

SYSERH*1 

ENCODE 

DiSFI.5 

EXIT 

EXIT, 

SYSERK 
SYSERH+1 
ERCOOt 
EXIT 
,F(,AG CONDITION, 



ERR0R2 

r,l 

SERVCE 



/0lSA8i.E AND Ct,EAR SCANNER FEAGS 



/TEST For 

/IS tAPP 



/YES, 
/NO 



'API' 

ON, 



(rpl) 



'APp ERROR, 



o 

o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 
o 
o 
o 
o 
o 
o 
o 



o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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01744 
03.745 
01746 
01747 
01750 
0i7Sl 
03,752 
01753 
01754 
01755 
0i756 
01757 
01760 
01761 
01762 
01763 
01764 
01765 
01766 
01767 
01770 
01771 

01772 
01773 
01774 
01775 
01776 
01777 
02000 

02001 
02002 
02003 
02004 
02005 
02006 
02007 



DC01EB SRC 



R 000000 A 

R 200151 R 

R 042067 R 

R 777776 A 

R 040020 R 

R 202155 R 

R 040022 R 

R 777 7/4 A 

R 040021 R 

R 202044 R 

R 502107 R 

R 3420/3 R 

R 040023 R 

R 222046 R 

R 040024 R 

R 202044 R 

R 502115 R 

R 040025 R 

R 202156 R 

R 0401^51 R 

R 101702 R 

R 600222 R 

R 101702 R 

R 200020 R 

R 542157 R 

R 600222 R 

R 202067 R 

R 0401S1 R 

R 621744 R 

R 7777/6 A 

R 040020 R 

R 202160 R 

R 040022 R 

R 777777 A 

R 040021 R 

R 600222 R 



dcqihEB system exerciser test 



/ERROR!, DATA 

/ 
ERRORl 



TRANSFER ERROR 





UAC 

PAC 

tAW 

DAC 

LAC 

DAC 

L,AW 

QAC 

LAC 

AND 

TAD 

DAC 

LAC<t 

DAC 
lAC 
AND 
DAC 
LAC 
DAC 
.JHS 

gMP 
HERE 
JMS 
LAC 
SAD 
JMP 
LAC 
DAC 
JMP» 
/ERR0R2, 'API' 
ERRORS LAW 
DAC 
LAC 
DAC 
LAW 
DAC 
JMP 
.EJECT 



/ENTER 
ERENTER 



DSTSWkJ 
SAVEPC 

SYSERR 

(i. 

ERCODE 

ERCODL^l 

(7000 
UNIT 

EHCOOE+1 
tEHP3" 

ERC00e*2 
TEMPI" 
«377 
ERq0DE*3 

(e;renter 

PSTSW0 

curtrn 

Exn 

AFTER PRINTING 
~" QLRTRN" 
SYSERK 
C«2 
EXIT 
b'AVEPC 
OSTSWW 
EHRORl 
INtERRUPTED 
■^2 

SYSERR 
(2 
ERCODE 

-i 

ERCODE^l 
EXIT 



/ERROR CODE 



/MASK SCANNER ADDRESS 
/ADD FAILING UNIT N0, 
/#!, SCANNER ADDRESS, 

/#2, TRANSMITTED DATA, 



/#3, RECEIVED DATA 



/CLEAR ALL OTHER TRN FLAGS AND SAVE DATA 



ERROR 



/HAS 



ERROR 

EXIT 



BEEN PRINTED? 



WITH NO FLAGS SET, 



/ERROR CODE 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 






o 

o 
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30 




dc0ie;b SRC 


dcqise;b sy 


02010 


R 


000000 


A 


ECHOl 





02011 


R 


000000 


A 


|£CH02 





02012 


R 


000000 


A 


ECH03 





02013 


R 


000000 


A 


ECH04 





02014 


R 


000000 


A 


SUTTl 





02015 


R 


000000 


A 


SIl,TT2 





02016 


R 


000000 


A 


SII,TT3 





02017 


R 


000000 


A 


SIUTT4 





02020 


R 


000000 


A 


SILSWI 





02021 


R 


000000 


A 


SIL,SW2 





02022 


R 


000000 


A 


SIUSW3 





02023 


R 


000000 


A 


SIUSW4 





02024 


R 


000000 


A 


HLDTTl 





02025 


R 


000000 


A 


HLPTT2 





02026 


R 


000000 


A 


HLDTT3 





02027 


R 


000000 


A 


HLDTT4 





02030 


R 


000000 


A 


UONEl 





02031 


R 


000000 


A 


1.0NE2 





02032 


R 


000000 


A 


I.0NE3 





02033 


R 


000000 


A 


U0NE4 





02034 


R 


000000 


A 


KSTORl 





02035 


R 


000000 


A 


KST0R2 





02036 


R 


000000 


A 


KST0R3 





02037 


R 


000000 


A 


KST0R4 





02040 


R 


000000 


A 


KST0R5 





02041 


R 


000000 


A 


KST0R6 





02042 


R 


000000 


A 


KST0R7 





02043 


R 


000000 


A 


KSTORO 





02044 


R 


000000 


A 


TEMPI 





02045 


R 


000000 


A 


TEMP2 





02046 


R 


000000 


A 


TEMP3 





02047 


R 


000000 


A 


TEMP4 





02050 


R 


000000 


A 


TEMP5 





02051 


R 


000000 


A 


TEMP6 





02052 


R 


000000 


A 


TEMP7 





02053 


R 


000000 


A 


TEMPO 





02054 


R 


000000 


A 


TEMP9 





02055 


R 


000000 


A 


TEMPi0 





02056 


R 


000000 


A 


TEMPll 





02057 


R 


000000 


A 


CKREC 





02060 


R 


000000 


A 


TYPDATA 





02061 


R 


000000 


A 


l,OOPA 





02062 


R 


000000 


A 


UOOPB 





02063 


R 


000000 


A 


UOOPC 





02064 


R 


000000 


A 


L,OQPD 





02065 


R 


000000 


A 


PASCNT 





02066 


R 


000000 


A 


WAUCT 





02067 


R 


000000 


A 


SAVEPC 





02070, 


R 


000000 


A 


SAVEAC 





02071 


R 


000000 


A 


SAVOST 





02072 


R 


000000 


A 


FLGDRV 





02073 


R 


000000 


A 


UNIT 



•EJECT 



o 

o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



o 
o 



o 



o 
o 
o 
o 

o 



AGE iX 




PC01EB ; 


SRC 






tj000y0 


R 




02074 


R 


.)014/3 


R 


»L 


0207t3 


R 


001504 


R 


^•»u 


02076 


R 


091515 


R 


K 


02077 


R 


001526 


R 


^l 


02100 


R 


0i^01t?2 


R 


«L 


02101 


R 


000515 


R 


^U 


02102 


R 


000570 


R 


^U 


02103 


R 


000643 


R 


*U 


02104 


R 


000716 


R 


<*l 


02105 


R 


60000 


A 


«L 


02106 


R 


000215 


A 


»U 


02107 


R 


007000 


A 


^l 


02110 


R 


000212 


A 


»U 


02111 


f^ 


001537 


R 


«L, 


D2112 


R 


001547 


R 


*^L, 


02113 


R 


in 55 7 


R 


'■*U 


02114 


R 


001567 


R 


^l- 


02115 


R 


000-^77 


A 


«l. 


02116 


R 


04 00 


A 


«L. 


02117 


R 


001360 


R 


^l. 


■ 02120 


R 


000526 


R 


<>i. 


02121 


R 


002037 


H 


*l. 


02122 


R 


002010 


R 


*^L. 


02123 


R 


0,02061 


R 


^l 


02124 


R 


000201 


A 


^U 


02125 


R 


000732 


R 


«U 


02126 


R 


000243 


A 


«L 


02127 


R 


000601 


R 


«L 


02130 


R 


002040 


R 


<M. 


02131 


R 


002011 


R 


«l. 


02132 


R 


002i!)62 


R 


^L 


02133 


R 


0006b4 


R 


^l 


02134 


R 


002041 


R 


'*l 


02136 


R 


002012 


R 


»L 


02136 


R 


002063 


R 


<^L 


02137 


R 


000727 


R 


K 


02140 


R 


002043 


R 


<^l 


02141 


R 


002013 


R 


«L 


02142 


R 


002064 


R 


»U 


02143 


R 


000007 


A 


»L 


214 4 


R 


001423 


R 


»l 


02145 


R 


000267 


A 


*L 


02146 


R 


0002/7 


A 


«L 


02147 


R 


000257 


A 


<''U 


02150 


R 


7 777/7 


A 


'*l 


02151 


R 


777000 


A 


^l 


02152 


R 


0015/7 


R 


«L 


02153 


R 


idii&/77 


A 


*U 


02154 


R 


031677 


R 


«L 


02155 


R 


000001 


A 


«L 


02156 


R 


001/72 


R 


«L. 


02157 


R 


777776 


A 


«U 



dcqi-f:b system exerciser test 
,end useksw 



O 

o 

O 
O 
O 
O 
O 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



PAGt '62 



DCW:lf:B SRC 



DCplr^EB SYSTEM EXERCISER TEST 



02160 R p00Dii2 A »[. 

SIz5E = 02206 NO ERROR LINES 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



( ) 





PAGE 66 DcyiEB SRC 


DCOl' 


'EB 


SYSTEM EX 


ERCISEF 


\ TE 


:sT 








ACTIVI 


01173 


R 


ACTIV2 


01504 


R 


AG! IV3 


fc!l5l5 


R 


ACTIV4 


01526 


R 




CHKFLG 


002^^7 


R 


CHKTRN 


00303 


R 


CHKTR2 


00326 


R 


CHKTR3 


00350 


R 




CHKTR4 


0037;? 


R 


CKFLG2 


0^240 


R 


UKFLG3 


00251 


R 


CKFLG4 


00262 


R 





CKREC' 


020E37 


R 


CKRECl 


00456 


R 


CKRtC2 


00531 


R 


CKREC3 


00604 


R 




CKREC4 


03657 


R 


CLRFGl 


00526 


R 


CUHFG2 


00601 


R 


CERFG3 


00654 


R 




CLRFG4 


mi2i 


R 


CLRTRN 


01702 


R 


CMPUTE 


00754 


R 


OATASW 


00010 


R 





DECODA 


t'10764 


R 


DECODE 


00732 


R 


Dl3rL,G 


00450 


R 


DISl 


01620 


R 




DIS2 


01621 


(■! 


D1S3 


01622 


R 


DIS4 


01623 


R 


DSTSW0 


00l5i 


R 




PSTSWl 


00514 


f^ 


0STSW2 


00567 


R 


gSTSW3 


00642 


R 


DSTSW4 


00715 


R 


o 


EBA 


707764 


A 


ECHOl 


02010 


R 


ECH02 


02011 


R 


ECH03 


02012 


R 




eCH04 


02013 


R 


EEM 


707702 


A 


EHCUDE 


00022 


R 


ERENTE 


01772 


R 




ERRQRl 


01744 


f? 


ERR0R2 


02001 


R 


EXIT 


00222 


R 


EXITM4 


01724 


R 


o 


EXITMt) 


01732 


W 


EXTCKF 


00273 


R 


FLGPRV 


02072 


R 


FL,0AT1 


01002 


R 




FL0AT2 


01067 


R 


F1.0AT3 


01154 


R 


FUQAT4 


01241 


R 


FUTIA 


03,030 


R 




FUT2A 


Wilis 


R 


FI-T3A 


01202 


R 


FUT4A 


01267 


R 


Hl-DTTl 


02024 


R 


o 


HLDTT2 


02025 


R 


HLDTT3 


02026 


R 


HLUTT4 


02027 


R 


HOLDSW 


01664 


R 




HOLD.l 


01677 


R 


INIT 


00031 


R 


K3T0R1 


02034 


R 


KST0R2 


02035 


R 




KST0R3 


02036 


R 


KST0R4 


02037 


R 


KSTQRS 


02040 


R 


KSTQR6 


02041 


R 


o 


KSTOR/ 


02042 


R 


K^TORO 


02043 


R 


lONEl 


02030 


R 


L0NE2 


02031 


R 




|-QNt3 


02032 


R 


UONE^ 


02033 


R 


uaoPA 


0206i 


R 


UOOPB 


02062 


R 




LOOPC 


02063 


R 


LOOPP 


02064 


R 


ESAl 


01624 


R 


l,SA2 


03,625 


R 


o 


l,SA3 


01626 


R 


LSA4 


01627 


R 


Cspi 


01630 


R 


LS02 


03,631 


R 




LSD.5 


01632 


R 


USP4 


01633 


R 


NOFUAG 


01737 


R 


N0TABU 


01424 


R 




pascnt 


02065 


R 


PKCHRl 


00433 


R 


PRTCHR 


00414 


R 


PRTTAB 


03,360 


R 


o 


RE CI 


00515 


f^ 


REC2 


00570 


R 


REC3 


00643 


R 


REC4 


00716 


R 




RESETP 


B0445 


R 


R0T9L 


0i654 


R 


R0T9R 


01644 


R 


RSPI 


01614 


R 




rsd;^ 


01615 


R 


RSD3 


01616 


R 


RSU4 


01617 


R 


RUBOUT 


00760 


R 


o 


savdst 


02071 


R 


SAVEAC 


02070 


R 


SAVEPC 


02067 


R 


SCNTAB 


03,577 


R 




SEUCTl 


0106^j 


R 


SEUCT2 


01145 


R 


SEUCT3 


01232 


R 


SEUCT4 


01317 


R 




SERVCE 


00144 


R 


SEfAVl 


01036 


R 


SETAV2 


01123 


R 


SETAV3 


01210 


R 


o 


SETAV4 


01275 


R 


SETPHT 


01345 


R 


saswi 


02020 


R 


SIUSW2 


02021 


R 




SIUSW3 


02022 


R 


SILSW4 


02023 


R 


SIUTTI 


02014 


R 


SILTT2 


02015 


R 




SaTT3 


B2016 


R 


SILTT4 


02017 


R 


susi 


01640 


R 


SIS2 


01641 


R 


o 


SLS3 


R16 4g 


R 


SLS4 


03,643 


R 


SSFi 


01610 


R 


SSF2 


01611 


R 




SSF^ 


01612 


R 


SSF4 


01613 


R 


STSl 


01634 


R 


STS2 


01635 


R 




STS;5 


01636 


R 


STS4 


03,637 


R 


SYSEIRR 


00020 


R 


TABUE3, 


01537 


R 


o 


TABLE? 


01547 


R 


TABUE3 


01557 


R 


TABLE4 


01567 


R 


TAGA 


00776 


R 




TEMPI 


02044 


R 


TEMP10 


02055 


R 


im?%x 


02056 


R 


TEMP2 


0204 5 


R 




TEMP 3 


a2046 


R 


TEMP4 


02047 


R 


TEMPS 


0205H 


R 


TEMP6 


02051 


R 


o 


TEMP7 


02052 


R 


TEHP8 


02053 


R 


TEMP9 


02054 


R 


TRNSMT 


01326 


R 




TRNSl 


01333 


R 


TYPDAT 


02060 


R 


TYPEQM 


00752 


R 


UNIT 


02073 


R 


o 



o 


USERSW 


0000t; 


R 


WAITCT 


02066 


R 














o 
o 































o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



PAGt. 34 [ 


JC01EB SRC 


ocoi- 


■EB 


SYSTEM EXERCISER TEST 






USERSW 


0000&1 


R 


DATASW 


00010 


R 


SYStRR 


00020 


R 


EHCODE 


00022 


R 


INIT 


00031 


R 


SERVCE 


00144 


R 


DST5W0 


00151 


R 


EXIT 


00222 


R 


CHKFLG 


00227 


R 


CKFUG2 


00240 


R 


0KPEG3 


002S1 


R 


CKFI.G4 


00262 


R 


EXTCKF 


00273 


R 


CHKTRN 


00303 


R 


CHKfR2 


00326 


R 


CHKTR3 


00350 


R 


CHKTFM 


00372 


R 


PRTCHH 


00414 


R 


PRCHRl 


00433 


R 


RESETP 


00445 


R 


DISFLG 


00450 


R 


CKRECi 


00456 


R 


PSTSWl 


0051-1 


R 


RECi 


00515 


R 


CLRFGl 


00526 


R 


CKREC2 


00531 


R 


PST3W2 


00567 


R 


REC2 


00570 


R 


CLRPG2 


00601 


R 


CKREC3 


00604 


R 


DS1SW3 


00642 


R 


REC3 


00643 


R 


CLRPG3 


00654 


R 


CKREa4 


00657 


R 


DStsW4 


00715 


R 


REC4 


00716 


R 


CLRFG4 


00727 


R 


DECODE 


00732 


R 


TYPEQM 


00752 


R 


CMPUTE 


00754 


R 


RUBOUT 


00760 


R 


DECDDA 


00764 


R 


tAGA 


00776 


R 


FlOATl 


01002 


R 


FLTIA 


01030 


R 


SETAVl 


01036 


R 


SEUCTl 


01060 


R 


Fl,0AT2 


01067 


R 


FLT2A 


01115 


R 


SETAV2 


01123 


R 


SEl,UT2 


01145 


R 


FI-0AT3 


01154 


R 


FLTvSA 


01202 


R 


SETAV3 


01210 


R 


SEUCT3 


01232 


R 


Fl,0AT4 


01241 


R 


FLT4A 


01267 


R 


SETAV4 


01275 


R 


SELUT4 


01317 


R 


THNSMT 


01326 


R 


TRNSl 


t'il333 


R 


SETPRT 


01345 


R 


PHTTAB 


01360 


R 


N0TABI 


01424 


R 


ACTIVl 


01473 


R 


ACTIV2 


01504 


R 


ACTiV3 


01515 


R 


ACTIV4 


01526 


R 


TABUEl 


01537 


R 


TA8UE2 


01547 


R 


TABLE3 


01557 


R 


TA8tE4 


01567 


R 


SCNl AB 


01577 


R 


SSFl 


01610 


R 


SSF2 


01611 


R 


SSF3 


01612 


R 


SSF4 


01613 


R 


RSDl 


01614 


R 


RSU2 


01615 


R 


RSD3 


01616 


R 


RSD4 


01617 


R 


DISl 


01620 


R 


DIS2 


01621 


R 


DISS 


01622 


R 


DIS4 


01623 


R 


l-SAl 


01624 


R 


USA^ 


01625 


R 


LSA3 


01626 


R 


US A 4 


01627 


R 


USDl 


01630 


R 


CSU2 


01631 


R 


USD3 


01632 


R 


ISD^r 


01633 


R 


STSl 


01634 


R 


STS2 


01635 


R 


STS3 


01636 


R 


STS4 


01637 


R 


SLSl 


01640 


R 


SLS2 


01641 


R 


SL.S3 


01642 


R 


SLS4 


01643 


R 


r6T9R 


01644 


R 


ROTVU 


01654 


R 


HQUDSW 


01664 


R 


H0UD,1 


01677 


R 


CURTRN 


01702 


R 


EXlfM4 


01724 


R 


EXITM5 


01732 


R 


NOFUAG 


31737 


R 


ERRORl 


01744 


R 


ERENTE 


01772 


R 


EKR0R2 


02001 


R 


ECHOl 


02010 


R 


ECH02 


02011 


R 


ECHQ3 


02012 


R 


ECH04 


02013 


R 


SILTTI 


02014 


R 


SILTT2 


02015 


R 


SIUTT3 


02016 


R 


SILTT4 


02017 


R 


SaSHl 


02020 


R 


SIUSW2 


02021 


R 


SILSW3 


02022 


R 


sasw4 


02023 


R 


HLDTTl 


02024 


R 


HUDTT2 


02025 


R 


HL0tT3 


02026 


R 


Hl,DTT4 


02027 


R 


I, ON EX 


0203fej 


R 


L0NE2 


02031 


R 


,|-0NE3 


02032 


R 


l,0NE4 


02033 


R 


KSTORl 


02034 


R 


KST0R2 


02035 


R 


KST0R3 


02036 


R 


KST0R4 


02037 


R 


KST0R5 


02040 


R 


KST0R6 


02041 


R 


KSTdR7 


02042 


R 


KST0R8 


02043 


R 


TEMPI 


02044 


R 


TEMP2 


02045 


R 


TEMP3 


02046 


R 


TEMP4 


02047 


R 


TEMP5 


02050 


R 


TEHP6 


02051 


R 


t£MP7 


02052 


R 


TEMPS 


02053 


R 


TEMP9 


02054 


f^ 


TEMP10 


02055 


R 


TEKPll 


02056 


R 


CKREC 


02057 


R 


TYPDAT 


02060 


R 


LOOPA 


02061 


R 


L,OOPB 


02062 


R 


LOOPC 


02063 


R 


UOOPD 


2064 


R 


PASCNT 


02065 


R 


WAltCT 


02066 


R 


SAVEPC 


02067 


R 


SAVE AG 


02070 


R 


SAVOST 


02071 


R 


FLGURV 


02072 


R 


UNIT 


02073 


R 


EEM 


707702 


A 


EBA 


707764 


A 















u 

u 

o 
o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
n 



